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PAGE  NUMPFPING  SCHEME  ♦** 


EACH  CHAPTE9  IN  THIS  MANUAL  IS  NUHBEPEO  CONSECUTIVELY  STARTING  WITH 
PAGE  1,  PXCE°T  AS  FOLLOHSI 

A)  CEPTAIN  PAGES  WHICH  DESCRIBE  SUCH  THINGS  AS  PROGRAMS  IN  A 
LTBPAPy;  SPECIFIC  SUBROUTINES  OP  PROGRAMS  WHICH  ARE  SOMEHOW 

pplated:  available  catalogued  procedures;  etc.,  may  expand  as 

PEVTSIONS  ARE  ISSUED  AND  SO  ARE  GIVEN  ONE  PAGE  NUMBER  (EG, 

7-?2).  IE  THE  DESCRIPTION  REQUIRES  MORE  THAN  ONE  PAGE,  THESE 
pages  ARP  numbered  .1,  ETC.  (EG,  7-2P.1,  7-22.2,  ...). 

references  in  THE  MANUAL  ARE  TO  THE  FIRST  PAGE  (E.G.,  7-22)  AND 
THE  SPECIFIC  ROUTINE  REFERENCED  CAN  THEN  BE  FOUND  IN 
ALPHABETICAL  ORDER.  THE  SPECIFIC  PAGES  INVOLVED  ARE; 

4-16  ETN-CALLABLF  UTILITIES 

7-22  HOW  TO  USE  SOME  PROCEDURES  IN  LIBRARY  PROFIL 

10-20  HOW  TO  USE  SOME  PROGRAMS  IN  LIBRARY  UTILITY 

P)  AFTER  PUBLICATION,  AS  ADDITIONAL  PAGES  ARE  ADDED,  THOSE  WHICH 
ARE  added  to  the  END  OF  A CHAPTER  WILL  CONTINUE  THE  NUMBERING 
SCHFME:  those  inserted  in  the  middle  of  a chapter  WILL  HAVE  .1, 
.2,  ETC.,  ADDED  TO  THE  PAGE  NUMBER  THEY  ARE  TO  FOLLOW  (EG,  7-6.1 
WILL  FOLLOW  7-6). 


REVISIONS 

THIS  PRINTING  IS  A MAJOR  REVISION  OF  THE  SEPTEMBER  1975  COMPUTER 
CENTEp  reference  manual  (CMO-24-75).  IT  INCLUDES  INFORMATION  ON  NEW 
HAPrWARE  AND  reflects  THOSE  CHANGES  AND  ADDITIONS  RESULTING  FROM  THE 
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*****  introduction  to  cnc  »sooo  computers  ***** 

THF  CCMPUTftTION,  MftlHFMftTICS  ftNO  LOGISTICS  OFPARTMFNT  HAS  THRFF 
CONTROL  DATA  fiOOO  COMPUTFPS.  THE  COC  6400  IS  LOCATED  IN  DUILDING  191*, 
THE  CDC  6600  AND  CDC  6700  ARE  LOCATED  IN  BUILDING  17.  THE  6600  AND 
6700  OPERATF  AS  A SINGLE  SYSTEM  SHARING  PERMANENT  FILES  AND  LOAD 
LEVELING  JOBS.  THESE  LARGE  DIGITAL  COMPUTERS  CAN  PUN  INDEPENDENTLY. 

THE  6400  AND  6600  EACH  HAVE  A SINGLE  CENTRAL  PROCESSING  UNIT  (CPU). 
THE  6705  IS  A DUAL  PROCESSOR,  WITH  THO  CPU'S  (6600  AND  6400)  WHICH 
OPERATE  CONCURRENTLY  ON  DIFFERENT  JOBS  BOTH  STORED  IN  CENTPAL  MEMORY 
(CM).  the  CM  ON  EACH  SYSTEM  IS  400000  OCTAL  (OP  131,072  DECIMAL) 

60-PIT  words. 


PERIPHERAL  PROCESSORS  (PP*S)  ARE  SMALL  COMPUTERS  (4096  MEMORY  OF 
12-PIT  WORDS)  WHICH  HANDLE  ALL  INPUT  AND  OUTPUT  (I/O).  THERE  APE  10 
PP'S  ON  THE  6400;  70  EACH  ON  THE  6600  AND  6700. 

THERE  ARE  12  I/O  CHANNELS  ON  THE  64001  24  EACH  ON  THE  6600  AND 
6700.  ALL  PFPIRHERAL  EOUIPMENT,  INCLUDING  PRINTERS,  TAPE  AND  DISK 
DRIVES,  AND  MULTIPLEXORS  FOR  REMOTE  TERMINALS,  INTERFACES  WITH  THE 
CENTRAL  SYSTEM  THROUGH  THE  PP'S  VIA  THE  I/O  CHANNELS. 


HARDWARE  CONFIGURATION  *** 

CDC  6400  (MAINFRAME  C - MFC) 

131,072  60-BIT  WORD  MEMORY 

10  PERIPHERAL  PROCESSORS 

MODEL  044  DISK  DRIVES  ( 0 SPINDLES) 

4 SEVEN-TRACK  TAPE  DRIVES 
2 PORTS  FOR  1700  TERMINALS 

2 TELEPHONE  LINES  FOR  BCD  2000-BAUD  TERMINALS  (227-1960) 

1 TELEPHONE  LINE  FOR  ASCII  2000-BAUD  TERMINALS  (227-2020) 

2 telephone  lines  for  ASCII  4000-BAUD  TERMINALS  (227-1674) 

20  TELEPHONE  LINES  FOR  300-BAUO  INTERACTIVE  TERMINALS 

(229-7700) 


(229-0900)  15 
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cnc  G600  (MAINFRAME  R - MFR) 

CnC  G700  (MAINFRAME  A - MFA) 


DUAL  CENTRAL  PROCESSORS  ON  6700  (CPA=6600,  CPB=6400) 
131,07?  60-BTT  MO»D  MEMORY  (EACH) 

?0  PERIOHERAL  PROCESSORS  (EACH) 

MODEL  6630  NON-REMOVABLE  DISK  (EACH) 

MODEL  844  DISK  DRIVES  (1  SPINDLE  EACH  ♦ ?6  SHARED) 
SIX  7-TRACK  TAPE  DRIVES  (66001?,  670014) 

TWO  9-TRACK  TAPE  DRIVES  (6700) 

3 1700  COMPUTERS  WITH  ?74  CONSOLES  FOR  IGS  (6700) 

1 1700  TERMINAL  (6700) 

1 ?660  DATA  CONCENTRATOR  (6600) 

9 TELEPHONE  LINES  FOR  ASCII/BCO  4800-BAUO  TERMINALS 


(??7-1  000  ) 

5 TELEPHONE  LINES  FOR  ASCII/BCO  ?0O0-BAUO  TERMINALS 

(??7-1960)  3 

(??7-1970)  ? 

? TELEPHONE  LINES  FOR  1200-BAUO  INTERACTIVE  TERMINALS 

BELL-?12  (227-217?)  1 
BELL-212  (227-2170)  1 
VAOIC  ( FUTURE  ) 

3?  TELEPHONE  LINES  FOR  3 0 0- /II 0 -R AUO  INTERACTIVE  TERMINALS 

(229-6000)  20 
(229-6610)  12 

1 ANNAPOLIS  telephone  LINE  FOR  300-RAUD  INTERACTIVE  TERMINALS 

(267-3206) 

1 ANNAPOLIS  TELEPHONE  LINE  FOR  llO-BAUO  INTERACTIVE  TERMINALS 

(267-3160 ) 


AOOITIONAL  LINES  ON  6600  APEt 

2 telephone  lines  for  BCD  4800-RAUO  TERMINALS 

2 TELEPHONE  LINES  FOR  ASCII  2000-BAUD  TERMINALS 

4 telephone  LINES  FOR  BCD  2000-BAUD  TERMINALS 

10  TELEPHONF  LINES  FOP  ASCII  4800-BAUO  TERMINALS 


( 227-2167) 
(227-2864) 
(227-2794) 
(227-277?) 
(227-2760  3 
(227-1997)  3 

(227-2803)  4 


THESE  SYSTEMS  ARE  COMPATIBLE  AND  BINARY  PROGRAMS  GENERATED  ON  ONE 
SYSTEM  MAY  BE  RUN  ON  ANOTHER.  HOWEVER,  THE  6400  PERMANENT  FILE  SYSTEM 
IS  completely  separate  EROM  the  6600/6700,  HENCE  USERS  SHOULD  CHOOSE 
THE  6400  OR  THE  6600/6700  FOR  PROCESSING  A CLASS  OE  PROGRAMS  TO  AVOID 
MAIMATNING  and  PAYING  FOR  DUPLICATE  SETS  OF  PERMANENT  FILES. 
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NOS/BF  1.0  *•* 

THF  OPERATING  SYSTEM  FOR  ALL  COC  f>000  COMPUTERS  AT  DTNSRDC  IS 
CALLFD  THF  NETWORK  OPERATING  SYSTEM/BATCH  ENVIRONMENT,  VERSION  1.0, 
(NCS/BF  1.0)  AND  DIFFERS  ONLY  SLIGHTLY  FROM  THE  STANDARD  NOS/BE  SYSTEM 
OF  CCC.  THE  INTERACTIVE  SYSTEM  FOR  TELETYPE-COMPATIBLE  TERMINALS  (6600 
AND  6400  ONLY),  MEDIUM  SPEED  BATCH  AND  HIGH  SPEED  REMOTE  TERMINALS  IS 
CALLED  INTERCOM.  THE  INTERACTIVE  GRAPHICS  SYSTEM  (IGS)  RUNS  FROM  THOSE 
1700  TERMINALS  WITH  ?74  CONSOLES.  THE  UNIT  RECORD  FQUIPMENT  (CARO 
READERS,  LINE  PRINTERS,  ETC.)  AT  THE  CENTRAL  SITE  IS  CONTROLLED  BY  A 
SUBSYSTEM  CALLED  JANUS,  WHICH  OCCUPIES  ONE  CONTROL  POINT.  THE 
REMAINING  CONTROL  POINTS  ARE  AVAILABLE  FOR  INTERACTIVE,  USER  BATCH  AND 
OTHER  SYSTEM  JOBS. 


EACH  CPU  HAS  24  REGISTERS  FOR  INFORMATION  ON  WHICH  TO  OPERATE) 

8 ADDRESS  (A)  REGISTERS,  8 OPERAND  (X)  REGISTERS  AND  8 INCREMENT  (B) 
REGTSTERS.  THE  6600  CPU  CAN  PERFORM  SEVERAL  DIFFERENT  FUNCTIONS 
SIMULTANEOUSLY  (2  ADOS,  2 MULTIPLIES,  2 INCREMENTS,  1 DIVIDE,  1 SHIFT, 

1 ECCLEAN,  1 BRANCH)  AND  IT  HAS  A BUFFER  OF  8 CM  WORDS  OF  INSTRUCTIONS, 
CALLED  AN  INSTRUCTION  STACK.  THESE  TWO  FEATURES  ALLOW  THE  6600  TO 
EXECUTE  FASTER  THAN  THE  6400  CPU.  ON  THE  6700,  ONE  JOB  MAY  BE  EXECUTED 
PARTLY  ON  THE  6600  CPU  AND  PARTLY  ON  THE  6400  CPU  AT  DIFFERENT  TIMES, 
BECAUSE  THE  CPU*S  ARE  SHARED  BY  MANY  JOBS. 

PERMANENT  FILES  (USER  PROGRAM  AND  DATA  FILES  RETAINED  FOR  FREQUENT 
USE)  RESIDE  ON  THE  844  DISK  DRIVES.  MOST  OF  THE  OPERATING  SYSTEM 
RFSTDES  ON  MASS  STORAGE  ON  844  SYSTEM  DISK.  USER  FILES,  IF  NOT 
SPECIFICALLY  REQUESTED  ON  A TAPE  OR  USER  DEVICE  SET,  WILL  BE  ASSIGNED 
TO  AVAILABLE  AREAS  OF  MASS  STORAGE. 

PRIOR  TO  APRIL  197S  THE  PRINCIPAL  OPERATING  SYSTEM  WAS  SCOPE  3.3. 
SOURCE  PROGRAMS  FROM  SCOPE  3.3  HERE  RECOMPILED  UNDER  SCOPE  3.4  OR 
NOS/EE  1.0.  OBJECT  DECKS  MAY  NOT  BE  MIXED.  (SEE  CCRM,  4-12)  ITEM  16.) 
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*»*  JOn  PROCESSING  ! 

fl  jcn  FNTFRING  THE  SYSTEM  GOES  TO  THE  INPUT  QUEUE  AND  WAITS  FOR  ! 

THF  SYSTEM  TO  CHECK  THAT  THE  RESOURCES  REQUIRED  BY  THE  JOB  (E.G.,  CM  ; 

ANT  TAPE  DRIVPS)  ARE  AVAILABLE.  WHEN  A JOB  HAS  THE  HIGHEST  PRIORITY 
(PPICRTTY  INCREASES  AS  A JOB  WAITS)  AND  RESOURCES  ARE  AVAILABLE,  THE 
JOP  IS  ASSIGNED  A JOB  DESCRIPTOR  UDT)  ENTRY  AND  MAY  OCCUPY  ONE  OF  THE 
CONTROL  POINTS  FOR  ACTIVE  JOBS  (UP  TO  15  CONTROL  POINTS).  THE  JOB  IS  1 

LOAOFO  INTO  AN  ASSIGNED  AREA  OF  CM  CALLED  THE  FIELD  LENGTH  )EL).  THE  i 

JOP  NAY  not  access  any  AREA  OF  MEMORY  OUTSIDE  ITS  OWN  EL,  BUT  THE 

SYSTEM  WILL  VARY  THE  SIZE  OF  EL  DURING  EXECUTION.  A USER  MAY  VARY  THE  ' 

MAXIMUM  EL  BY  THE  CONTROL  CARD  PEL  (CCRM,  ?-18).  A JOB  MAY  BE 

AUTCMAT ICALL Y SWAPPFO  OUT  TO  ALLOW  OTHER  JOBS  TO  RUN  WHILE  WAITING  FOR  j 

RESCUOCES  SUCH  AS  EL,  TAPE  MOUNT,  OR  CENTRAL  PROCESSOR  (CP)  TIME.  THE  j 

JOP  WILL  SHARE  THE  CPU(S)  AND  THE  PP'S  WITH  THE  OTHER  ACTIVE  JOBS  UNTIL  | 

IT  IS  COMPLETEO.  THEN  THE  RESULTS  OF  THE  JOB  WAIT  IN  THE  OUTPUT  QUEUE 
FOP  PRINTING  AND/OR  PUNCHING. 

THF  USER  CONTROLS  HIS  JOB'S  EXECUTION  THROUGH  CONTROL  CARDS  WHICH 
MUST  APPEAR  IN  THF  FIRST  LOGICAL  RECORD  OF  HIS  PROGRAM  DECK.  ONE  CARO 
IS  PROCESSED  AT  A TIME  AND  ANY  CONTROL  CARDS  REQUIRING  DATA  (SUCH  AS  A 
FORTRAN  COMPILATION)  WILL  TAKE  THE  NEXT  LOGICAL  RECORD  IN  THE  JOB'S 

INPUT  PTPFAM.  j 

i 

A RECORD  OF  the  ACTIVITY  ON  THE  SYSTEM  IS  RECORDED  IN  THE  DAYFILE.  ! 

THF  last  rage  of  output  for  every  job  CONTAINS  THAT  JOB'S  DAYFILE,  i 

LISTING  ALL  THE  CONTROL  CARDS  PROCESSED  (EXCEPT  CHARGE  CARO)  AND  THE  j 

SYSTEM  MESSAGES.  1 

THF  5700,  5500  AND  6400  SYSTEMS  OPERATE  INDEPENDENTLY  BUT  THE  I 

OPERATING  systems  ARE  COMPATIBLE.  TAPES  AND  DEVICE  SETS  (PRIVATE  DISK  j 

PACKS)  ARE  SHARED  BY  THE  6600  AND  6700.  IF  A USER  MUST  HAVE  THE  SAME  | 

INFCPMATION  at  all  COMPUTERS,  HE  SHOULD  CREATE  DUPLICATES,  SO  THAT  JOBS 
APE  NOT  ABORTED  DUE  TO  THE  UNAVAILABILITY  OF  SUCH  FILES.  THERE  IS  ONE 
PFPMANFNT  FILE  BASF  SHARED  BY  THE  6600  AND  67001  THE  6400  HAS  ITS  OWN 
PERMANENT  EILF  BASE. 

TC  “OVE  A tape  from  ONE  BUILDING  TO  THE  OTHER  (6400)  OR  TO  REMOVE  A 
TAPE  TEMPORARILY  FROM  THE  COMPUTER  SYSTEMS,  THE  USER  MUST  CONTACT  THE  j 

TAPE  librarian,  code  18B6,  BLOG  17,  ROOM  100,  (Z02)  227-1227.  ‘ 

POLICY  GOVFPNIMG  THE  USE  OF  THE  COMPUTERS  AND  THE  CHARGES  ECR 
DIFFFpenT  categories  OF  SERVICE  IS  GIVEN  IN  THE  COMPUTER  CENTER  POLICY, 

OCTCPPP  1B77.  INFORMATION  ON  CURRENT  CHARGES  MAY  BE  OBTAINED  FROM  CODE 
ipol,  r’rif)  ?77-iT6i. 

CLASSIFIED  WORK  IS  °UN  AT  SPECIFIED  TIMES  WHEN  NO  REMOTE  TERMINALS 

have  access  to  the  central  COMPUTER. 
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»**  PRIVftCV  ACT  OF  1974 


PUBLIC  LAW  97-979,  WHICH  RECAHF  FFFFCTIVF  IN  THF  FALL  OF  1979, 

PPOVTOFS  SAPFGUAROi;  FOR  INDIVIDUALS  AGAINST  INVASION  OF  IHFIR  PERSONAL  i 

PRIVACY.  THIS  LAW  ALSO  PROVIDES  SERIOUS  INDIVIDUAL  PENALTIES  FCR  | 

VTOLATTCNS.  THP  FOLLOWING  SIMPLE  SECURITY  RULES  AND  PROCEDURES  ARE  THF 
PESFCNSIP ILITY  OF  EACH  USER  TO  FOLLOW  TO  HELP  MAINTAIN  THE  INTEGRITY  OF  j 

THF  COMPUTER  SYSTEM'S  FILES.  | 

1)  users  must  have  explicit  PERMISSION  9FF0RE  THEY  ACCESS  FILES,  | 

COMPUTER  LISTINGS,  CARDS,  TAPES,  DISK  PACKS,  DOCUMENTATION,  ETC.,  ] 

WHICH  RFLONG  to  other  individuals  and  projects.  (PU9LIC  ACCESS  j 

FILES  AS  DOCUMENTED  IN  THIS  MANUAL  AND  IN  THE  COMPUTER  CENTER  NOTES  i 

(SPF  CCRM,  13-1)  ARE  AVAILAPLF  TO  ALL  USERS.)  ] 

2)  JOP  ORDER  NUMBERS,  USER  ID'S,  TAPE  ID'S  AND  INTERCOM  ID'S  MUST  BE 

USED  ONLY  WHEN  AUTHORIZED.  j 

3)  USPRS  HAVE  NO  AUTHORITY  TO  TAMPER  WITH  THE  OPERATING  SYSTEM.  ] 

FRCGPAMS,  ROUTINES  AND  FILES  (PASSWORD,  ACCOUNT,  ETC.),  USED  FOR  j 

SYSTEM  MATNTENANCE  MAY  NOT  PE  ACCESSED.  ’ 

1 

4)  FPRMANENT  files  and  tapes,  containing  PERSONAL  DATA,  SHOULD  BE  j 

FRCTFCTED  WITH  PASSWORDS  (SEE  CCRM,  3-6)  AND  LABELS,  RESPECTIVELY,  1 

AND  THESE  IDENTIFICATIONS  SHOULD  BE  KEPT  CONFIDENTIAL  AND  CHANGED  ! 

frequently  to  discourage  disclosure  of  file  data.  i 

i 


5)  INTPPCOM  USERS  SHOULD  USE  THE  TURNKEY  PASSWORD  (CCRM,  9-2)  TO 
FPCTFCT  their  ACCOUNT  NUMBERS. 

6)  FOR  assistance  IN  PASSWORD  PROTECTION  OF  YOUR  FILES  OR 
CLARIFICATION  OF  ANY  OF  THE  ABOVE,  CONTACT  USER  SERVICES 
(202)  227-1907. 

7)  USERS  WHO  require  SPECIAL  HANDLING  FOR  DATA  TAPES  AND  OUTPUT 
CONTAINING  PERSONAL  DATA  SHOULD  NOTIFY  OPERATIONS  BRANCH,  CODE. 

(R02)  227-1227, 


SPF  CCRM,  2-9,  FOR  A MEANS  OF  IDENTIFYING  PRINTOUTS  AS  PRIVATE. 


I 
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•*»  KEYPUNCH  CHARACTERS 

THE  STANCARn  KEYPUNCH  CHARACTER  SET  IS  THAT  OF  THE  IBM  026  MODEL. 
HOWEVER,  THERE  ARE  WAYS  OE  USING  A SUBSET  OF  THE  EBCDIC  CHARACTER  SET 
(SEE  THE  DTNSRDC  CHARACTER  SET,  CCRM,  1-9  FOR  THE  CHARACTERS  ALLOWED), 

SOURCE  CAPOS  PUNCHED  FROM  THE  PUNCH  FILE  OF  CDC  6000  WILL  NORMALLY 
BE  026  WHETHEP  INPUT  WAS  026  OR  02B.  THERE  IS  A ROUTINE  FOR  CONVERSION 
OE  AN  026  DECK  TO  0 ?B  (SEE  CCLIB/Pt  CV29) 

PROGRAMS  RECEIVED  ON  7-TRACK  TAPE  IN  EBCDIC  ARE  NOT  HANDLED  BY  THE 
AUTCMATTC  CONVERSION,  BUT  MUST  BE  CONVERTED  BY  A SPECIAL  PROGRAM. 


**•  USE  OE  ALTERNATE  KEYPUNCH  CHARACTERS  •** 

FOP  JOBS  SUBMITTED  AT  CENTRAL  SITE  OR  FROM  A 1700 

THE  029  KEYPUNCH  MAY  BE  USED  TO  PUNCH  CARDS  FOR  THE  6000,  IF  THE 
END-CP-RECORD  CARD  (OP  THE  JOB  CARD)  PRECEDING  THOSE  CARDS  HAS  29 

PUNCHEE  IN  COLUMNS  79  AND  HO.  FOR  EXAMPLE,  IF  ALL  CARDS  IN  A JOB  HAVE 

BEEN  PUNCHED  ON  AN  029  KEYPUNCH,  THEN  29  SHOULD  BE  PUNCHED  IN  THE  JOB 

CARP.  HOWEVER,  IE  ONLY  THE  SOURCE  CAROS  HAVE  BEEN  PUNCHED  WITH  THE 

PBCCIC  CHAPACTPPS,  then  a 29  SHOULD  BE  PUNCHED  IN  COLUMNS  70  AND  HO  OF 
THF  END-OE-PECCPO  CARD  (7/8/9)  IMMEDIATELY  PRECEDING  THE  SOURCE  CARDS. 
THP  INPUT  FOP  A SUCCEEDTNG  RECORD  MAY  BE  RESET  TO  026  MODE  BY  PUNCHING 
26  TN  COLUMNS  79  AND  80  OP  THE  PRECEOTNG  7/8/9  ENO-OF-RECORD.  NOTE 
THAT  ALL  CARDS  IN  A LOGICAL  RECORD  MUST  BE  OE  THE  SAME  KEYPUNCH 
CHARACTER  SFT.  (SEP  CCRM,  1-9  AND  APPENDIX  A OP  ANY  REFERENCE  MANUAL) 

THF  MOST  FRRDUENTLY  USED  CHARACTERS  WHICH  DIFFER  BETWEFN  026  AND 
0?9  keypunches  are  the  following  four  characters  ( ) = AND  ♦ . 


FOR  jnPS  SUBMITTED  FROM  A 200  USER  TERMINAL 

TO  pr®n  ny  A 2AQ  USER  TERMINAL,  ALL  CARDS  IN  A JOB  DECK  MUST  BE 
IN  THP  SAMP  PUNCHING,  AND  THE  OPERATOR  MANUALLY  WILL  SELECT  026  OR  029 
MODF.  Tht  mode  is  standard.  (PUNCH  29  IN  COLUMNS  79  AND  80  OF 

the  JO"  CAPO  TO  INDICATE  THE  MODE  TO  THE  OPERATOR.) 
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INTFPNflL  DATft  '5TRUCTUPF 


1.  TNT'-PNflL  PPPPFSFNTflTTCN  OF  HOLLPPITH  DATA  IS  DISPLAY  CODE  IN  THF 

roc  Foon  out  tntepnal  nrn  in  sc  40?o  op  idn  7Cdo.  this  means 
that  drOCPAMS  using  octal  constants  to  define  HOLLERITH  DATA 
WILL  PFOUIRE  modification.  NOTE  THAT  A DISPLAY  CODE  ZFPQ  IS  AN 
OCTAL  IS  AND  NOT  00,  WHICH  COULD  CAUSE  TROUBLE  WITH  MASKS. 

HOLLERITH  WORD  INTERNAL  MACHINE  REPRESENTATION 


BLANKS 
ZEROES 
»TAPE4fl  ' 


T3T33T33T3T3T333T333 


?.  THF  CHARACTFP  SEQUENCE  ON  THE  DTNSROC  CDC  6000  IS  THE  ASCII  63- 
CHAPACTFP  SET  (SEE  CCPM,  1-9).  NOTE  THAT  THE  ALPHABET  PRECEDES 
NUMBERS  AND  SPECIAL  CHARACTERS  FOR  FORTRAN  ALPHABETIC  COMPARE 
(FTN,  APPENDIX  A).  COBOL  USES  THE  ASCII6  COLLATING  SEQUENCE 
(NUMBPRS  BEFORE  LETTERS)  (COBOL,  APPENDIX  A).  TO  USE  THE  C0B0L6 
COLLATING  SEQUENCE  (LETTERS  BEFORE  NUMBERS),  THF  U PARAMETER  MUST 
°F  INCLUDED  ON  THE  COBOL  CAPO  (CCRM,  6-2).  THE  COLLATING 

sFQUPNcr  for  sort/merge  IS  specteied  by  the  user  in  the 

pORT/MERGp  control  CARDS  (SORT,  4-10  THRU  14,  APPENDIX  B).  SORTS 
USING  SCOOP  DIRECTIVES  ALWAYS  USE  ASCIIS. 


3.  WORD  length  in  the  6000  IS  60  BITS  (10  BCD  CHARACTERS  PER  WORD) 
AS  COMPARED  WITH  36  BTTS  (6  BCD  CHARACTERS  PER  WORD)  IN  THE 
UNTVAC  IlOa  AND  IBM  7090  AND  32  BITS  (4  EBCDIC  CHARACTERS  PER 
WORD)  IN  THE  IBM  S/360.  THIS  AFFECTS  THE  CONVERSION  OF  PROGRAMS 
IN  FOUR  AREAS* 

A.  THE  OEGREE  OF  PRECISION  OF  OPERATIONS  TS  MUCH  HIGHER. 

THEREFORE  CONVERGENCE  FACTORS  MflY  BE  SMALLER  IM  ABSOLUTE 
value. 

o.  constants  and  data  may  be  increased  to  greatep  accuracy  by 
ADDING  ADOTTTONAL  SIGNIFICANT  DIGITS,  UP  TO  16  DIGITS, 
r.  OCTAL  CONSTANTS  USED  IM  MASKING  OPERATIONS  ARE  GENERALLY 

AEFErTED  AND  REQUIRE  ALTERATION  ACCORDING  TO  THI  INTENDED 
USE. 

D.  SINCE  WORDS  CONTAIN  10  CHARACTERS  PER  WQPD  INSTEAD  OF  6 OP  4, 
DATA  statements  THAT  STORE  A STRING  OF  HOLLERITH  CHARACTFPS 
MAY  POSITION  THE  CHARACTERS  IN  DIFFERENT  RELATIVE  POSITIONS 
IN  DIFFERENT  WORDS,  EXCEPT  FOR  THE  FIRST  6 OR  4 CHARACTERS. 
ALL  VARIABLE  FORMATS  (WHETHER  READ  IN  from  CARDS  OR  CREATED 
nv  the  odoGRAMMEO)  SHOULD  BF  CHECKED. 
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««.  THF  good  USrS  SOM'’  SPECIAL  91  T CONFIGURATIONS  IN  FLOATING  POINT  ] 

APITH9FTIC  TO  INOICATF  INOFFINITE  ANO  INFINITF  OPEPANDS.  AN  ^ 

INOFFINTTP  pay  of  CAUSFD  PY  0/0  ANO  AN  INFINITE  BY  N/0  OPERATION. 

FITHFP  FPPOP  COULO  RF  CAUSFO  BY  REFERENCING  PROGRAM  AREAS  NOT  ' 

TNTTIALT7FO  OP  APEAS  OVERWRITTEN  DUE  TO  INADEQUATE  STORAGE 

PFSPPVATION.  THE  CPU  WILL  NOT  00  ANY  FURTHER  CALCULATION  IF  IT 

PNCCUNTFRS  SUCH  A NUMBER  ANO  THE  JOB  WILL  ABORT  WITH  AN  ERROR 

HOOF  ? OP  «.  (SEE  ERROR  MFSSAGFS»  CCRM, 

♦ INEINITY  T777YXYXKXXXVX)00(XXX  ^ 

- INFINITY  4000XXXXXXXXXXXXXXXX 

♦ INDEFINITE  1777XXXXXXXXXXXXXXXX 

- INDEFTNITF  G 0 00 XX XX XX XXX XXX XXX X 

WHFPF  •f  IS  ANY  OCTAL  DIGIT,  USUALLY  0. 


S.  THE  WORD  FORMAT  OF  FLOATING  POINT  NUMBERS  HAS  BITS  FOR  THF 

rOEFFICIFNT,  11  BITS  FOP  THE  EXPONENT  PLUS  1 SIGN  BIT.  THE  RANGE 
OF  PFomTSSIBLF  numbers  is  10**-?9T  TO  10**32?.  INTEGERS  MAY  BE 
FO  PITS  BUT  MUST  NOT  EXCEED  «*  fl  BITS  -I,  15  DIGITS)  IF  THEY 

ARE  TO  BE  USED  IN  MULTIPLICATION  AND  DIVISION  OPERATIONS.  A 
HARDWARF  MULTIPLY  INSTRUCTION  IS  AVAILABLE  IN  NOS/BE  1.0. 

TNTFGFp  niVTSTON  IS  PFRFOPMED  BY  SOFTWARE  USING  THE  FLOATING 
COINT  registers. 

example  CDC  good  IBM  360  IBM  7090 


1 

-1 
1 .0 
-1.0 
P.O 
4.0 


0000000000  onoooooool 

7777777777  7777777776 
17?04000O0  0000000000 
G057T77777  7777777777 
17?140n000  OOOCOOOOOO 
172?400000  0000000000 


00000001 

FFFFFFFF 

41100000 

CllOOOOO 

41200000 

41400000 


000000000001 

400000000001 

201400000000 

601400000000 

202400000000 

203400000000 


note  the  OIEEFRENCF  in  format  of  NEGATIVE  NUMBERSt 

CDC  6000  IBM  360  IBM  7090 


CNE*d  complement  TWO'S  COMPLEMENT  SIGNED  MAGNITUDE 

EE  absolute  value  of  absolute  value 

E.  LDGTCAL  VARIAoles  in  THF  GOOO  ARE  EXPRESSED  AS  -1  FOR  TRUE  ANO 

♦0  FDR  FALSE. 

7.  THE  program  ETElD  length  TN  CENTRAL  MEMORY  IS  NOT  ALWAYS  SET  TO 
7FPr5  PY  THF  LDADFP.  SEE  PRES  E T /PRE  SF  T A OPTION  ON  LOSET  CARD, 
rroY,  7-iG. 


•.  roHpijTER  TNCTRIJCTIONS  ARE  15  OR  30  BITS  LONG.  HENCE  ONE  CM  WORD 
MAY  rONTATN  UP  TO  FOUR  INSTRUCTIONS.  THE  NO-OPFRATION 
'NSTduC’IDN  (46000)  IS  USED  TO  FILL  WORDS  WHFN  THE  NEXT 
instruction  cannot  fit  INTO  THF  SAMF  WORD. 


I 
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DTNSPDC 

CHARACTEP 

SET  *** 

SPLflV 

CHAPAC7FP 

PUNCH 

PUNCH 

7-T»ACK 

NOTE 

ronF 

026 

029 

TAPE 

NAME 

IF 

niFF 

01 

AAA 

12-1 

61 

02 

RB6 

12-2 

62 

07 

rcc 

12-7 

67 

04 

non 

12-4 

64 

OF 

FFF 

12-5 

65 

06 

FFF 

12-6 

66 

07 

GGG 

12-7 

67 

10 

HHH 

12-8 

70 

11 

TII 

12-9 

71 

12 

JJJ 

11-1 

41 

17 

KKK 

11-2 

42 

14 

LLL 

11-3 

43 

IF 

MHM 

11-4 

44 

16 

NNN 

11-5 

45 

17 

000 

11-6 

46 

20 

PPP 

11-7 

47 

21 

OQO 

11-8 

50 

22 

PRR 

11-9 

51 

27 

sss 

0-2 

22 

24 

TTT 

0-3 

23 

7F 

UUU 

0-4 

24 

26 

VVV 

0-5 

25 

27 

WWW 

0-6 

26 

30 

XXX 

0-7 

27 

31 

YYY 

0-8 

30 

72 

717 

0-9 

31 

77 

000 

0 

12 

(SOMETIMES  00) 

34 

111 

1 

01 

7F 

222 

2 

02 

36 

737 

7 

03 

77 

444 

4 

04 

40 

FFF 

5 

05 

41 

666 

6 

06 

42 

777 

7 

07 

43 

FFS 

8 

10 

44 

990 

9 

11 

4F 

♦ ♦♦ 

12 

12-6-8 

60 

PLUS 

4F 

— 

11 

40 

MINUS 

47 

* « * 

11-4-8 

54 

ASTERISK 

FO 

/// 

0-1 

21 

SLASH 

FI 

( f ( 

0-4-8 

12-5-8 

34 

LEFT  PARENTHESIS 

F2 

) ) ) 

12-4-8 

11-5-8 

74 

RIGHT  PARENTHESIS 

F7 

11-3-8 

53 

DOLLAR 

64 

= = - 

7-8 

6-8 

17 

EQUAL 

5F 

20 

BLANK 

F6 

« » » 

0-3-8 

33 

COMMA 

F7 

• • • 

12-7-8 

73 

PERIOD 
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DISPLAY 

CHARACTER 

PUNCH 

PUNCH 

7-TRACK 

NOTE 

CCDF 

026 

029 

TAPE 

NAME 

F,0 

0-6-R 

3-8 

36 

POUND 

FI 

fCT 

7-R 

12-2-8 

17 

(1)  L BRACKET 

6? 

0-2-8 

11-2-8 

3? 

(1)  R BRACKET 

F3 

1 1 1 

2-8 

(2)  COLON 
(SOMETIMES  16) 

F4 

4-8 

7-8 

14 

QUOTE 

65 

0-5-8 

35 

UNDERLINE 

66 

til 

11-2-8 

12-7-8 

52 

(1)  EXCLAMATION  (3) 

66 

III 

11-0 

52 

(1)  EXCLAMATION  (3) 

67 

&&& 

0-7-8 

12 

37 

AMPERSAND 

70 

III 

11-5-8 

5-8 

55 

(1)  APOSTROPHE 

71 

??? 

11-6-8 

0-7-8 

56 

QUESTION 

72 

< < < 

12-2-8 

12-4-8 

72 

(1)  LESS  THAN  (3) 

72 

<<< 

12-0 

72 

(1)  LESS  THAN  (3) 

73 

>>> 

11-7-8 

0-6-8 

57 

GREATER 

74 

3S13 

5-8 

4-8 

15 

(1)  AT 

75 

\\\ 

12-5-8 

0-2-8 

75 

REVERSE  SLANT 

76 

AAA 

12-6-8 

11-7-8 

76 

CIRCUMFLEX 

77 

• • • 

12-7-8 

11-6-8 

77 

(4)  SEMICOLON 

55 

8-6 

0-8-4 

BLANK 

notes: 

tl)  THE  SIX  C:HAPACTE'’S  DIFFERENT  BETWEEN  SCOPE  3.3  AND  3.4 

ARE  LEFT  BRACKET,  RIGHT  BRACKET,  EXCLAMATION,  APOSTROPHE, 
LESS  THAN,  AND  AT.  THE  0?6  PUNCH  IS  DIFFERENT  FOR  EACH. 
THE  029  PUNCH  IS  the  SAME  EXCEPT  FOR  ALTERNATE  PUNCHES 
11-0  AND  12-0  (THE  DISPLAY  CODE  ASSOCIATED  WITH  THE  029 
IS  DIFFERENT.)  TH^SE  F CHARACTERS  MAY  HAVE  DIFFERENT 
GRAPHICS  ON  A 200UT.  THERE  IS  NO  CHANGE  FROM  SCOPE  3.4  TO 
NOS/BE  1.0. 

(?)  ON  7-TPACK  TAPE  BECOMES  7ERO  (DISPLAY  33) 

(•»)  ALTERNATE  PUNCHES 

(4)  AVOID  WHOLF  WORD  OF  SFMICOLON  ( ENO-OF-RECORO ) 
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*•*  OCT AL-nECIMAL  CONVERSION 


• « • 


AOCRESSES  ANO  OATA  OCCURRING  IN  CORE  OUHPS  ARE  OCTAL. 


OCTAL 


decimal 


10 

8 

40 

3? 

100 

64 

400 

256 

1000 

512 

?000 

1024 

40  00 

2048 

10000 

4096 

200  00 

8192 

30000 

12288 

400  00 

16384 

50000 

20480 

60000 

24576 

700  00 

28672 

100000 

32768 

140000 

49152 

200000 

65536 

TAPLES  OF  octal 

-DECIMAL  AND 

OCTAL-HEX  ARE 

CDC  6000 

REAL  ELOATINI 

decimal 

POSITIVE 

.0001 

1702643334 

2726161031 

. 0005 

1705406111 

5645706520 

.001 

1706406111 

5645706520 

. 005 

1710507534 

1217270244 

.01 

1711507534 

1217270244 

. 05 

1713631463 

1463146315 

.1 

1714631463 

1463146315 

.5 

1717400000 

0000000003 

0.0 

0000000000 

0000000000 

1. 

1720400000 

0000000000 

5. 

1722500000 

0000000000 

10. 

17235000C  3 

0000000000 

50. 

1725620000 

0000000000 

100. 

1726620000 

0000000000 

500. 

1730764000 

0000000000 

1 0 00. 

1731764000 

0000000000 

5000  . 

1734470400 

0000000000 

10000. 

1735470400 

0000000000 

1.0F15 

2002706576 

5114320000 

NEGATIVE 


60751I44h3 

607?371666 

6071371666 

6067270?<*3 

6066270243 

6064146314 

6063146314 

6060377777 

7777777777 

6057377777 

6055277777 

6054?77777 

6052157777 

6051157777 

6047013777 

6046013777 

6043307377 

6042307377 

5775071201 


505 1616746 
^13^0  7125  7 
2132071257 
6560507533 
6560507533 
631463146? 
631463146? 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
7777777777 
2663457777 


f'SY  iq7F- 
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•**  octal-dfctmal  fractions 


OCTAL 

DEC 

OCTAL 

DEC 

. 1 

.125 

.01 

.015625 

o 

« U 

.250 

.02 

.031250 

. T 

.375 

.03 

.046075 

. 4 

.500 

.04 

.062500 

.5 

.625 

.05 

.076125 

.6 

.750 

. 06 

. 093750 

. 7 

.075 

.07 

.109375 

octal 

DEC 

octal 

DEC 

. Of’l 

.001953 

. 0001 

.000244 

.002 

.003906 

. 0002 

.000488 

.00  3 

.005859 

.0003 

.00073? 

.004 

.007812 

. 0004 

.000976 

.005 

.009765 

. 0005 

.001220 

.006 

.011718 

. 0006 

.001464 

.007 

.013671 

. 000  7 

.001708 

OCTAL 

OFC 

octal 

DEC 

.00001 

.000030 

.000001 

.000003 

.00002 

.000061 

.00000? 

.000007 

.00003 

.000091 

.000003 

.000011 

.00004 

.000122 

.000004 

.000015 

.00005 

.000152 

.000005 

,000019 

.00006 

.000163 

.000006 

. 00  0022 

.00007 

.00021 3 

.000007 

.000026 

CONVFRSION  FXAMPLFS 
nCTfll  NtJMqrp  lMf>  <♦  1 T5 ?4 0 1 ? I'tSe/ 7 T 


nrriMaL  VALUF  ?••(-!) 


?** (-1) 


* .soo 

. 01S62S 
. 005‘^sq 
. 0012?0 
. 0000f>l 
. 0000  15 


* .5??7fl0  r .26109 


octal  NU^RTP  200?  70667651 1402000 0 
nc-TMftL  2**62  * .075 

.000 

.011710 

.001220 

.000210 

.000022 


?**62 


• .000170 


1.0F15 
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CONTROL  CARO  FIFLD  LENGTHS  *•* 

CTNSROC  nos/of  1.0  USERS  SHOULO  OMIT  CM  FROM  JOB  CARD  UNLESS  COPE 
TN  FVC^SS  OF  i*E000  WILL  BE  REQUIRED.  THE  SYSTEM  ADJUSTS  ITS  FL 
AUTCMATICALLY  FOR  THE  FOLLOWING  PRODUCTS  AND  SYSTEM  CONTROL  CAROSt 


ATTACH 

2000 

AUDIT 

J5000 

BBTOGRM 

10000 

BEGIN, 

REVERT 

4500 

BKSP 

1000 

CATALOG 

2000 

CHARGE 

3200 

CLEAR 

200 

CKP 

13000 

COMBINE 

20000 

COMPARE 

7000 

COPY 

200  00 

COPYBF, 

COPYBR 

20000 

COPYCF, 

COPYCR 

20000 

COPYCL 

37000 

COPYE 

6000 

COPYF 

6000 

COPYL, 

COPYLM 

12000 

COPYN 

6000 

COPYR 

6000 

COPYRM 

21000 

COPYSBF, 

COPYSE 

11000 

COPYSR 

11000 

CPTNOEX 

15000 

DISPOSE 

200 

DUHPF 

26000 

ESTMATE 

37000 

EXTEND 

2000 

FILE 

2000 

ITEMIZE 

12000 

LABEL 

2000 

LIBRARY 

300 

LOAOPF 

26000 

MOUNT 

2000 

PFOUMP 

35000 

PRNTSPY 

35000 

PURGE 

2000 

RANCONV 

6000 

RENAME 

2000 

REQUEST 

2000 

RESTART 

25000 

RETURN 

200 

REWIND 

200 

ROUTE 

1000 

SISTAT 

21000 

SKTPF, 

SKIPB 

1000 

SYSBULL 

2000 

TR ANSF 

300 

UNLOAD 

200 
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•»*  PECOMNENDEU  FTELU  LENGTHS 


ALGCL  46000 
APT  66700 

1??000 

9A«;ir  40000 
CnPCL  61000 
cneoLS  66000 
GOMFAS'^  65000 
DDL  44000 
ECAP  70000 
rnlTLIR  45000 
PCPN  63000 

PTN  46000 
PTN,P  61000 
FTN,CPT=?  54000 
GPSS  70000 
LOAC  30000 
MAPSVT  60000 
MINIC  70000 
NNF  53000 
NFTFC  13000 
OMK’TTAP  170000 
PEPTC  117000 
PFPT66  170000 
PLl  170000 
QU  (CUFPY  UPDAT'^)  65000 
PATFCP  46000 
PUN  45000 
STPI6  (STHSCPTPT  1.6)  67000 
SINT  16  { ••  II. 6) 

SNCPCL  76000 
SOpT/MFRGF  60000 
S7000  50000 
UPPATE  40000 


MINIMUM  SEE  CCPM,  11-1 
ATTACH, APT3. 
ATT ACH, APT4, 

MINIMUM 

MINIMUM  SFE  CCRM,  5-15 


MINIMUM 

MINIMUM 

MINIMUM 
MINIMUM 
MINIMUM 
MINIMUM 
MINIMUM 
(UPD ATES 


MINIMUM 

MINIMUM 


ATT ACH, ECAMP. 

(MOST  OPTIONS  REQUIRE  AT  LEAST 
60000) 

(PREFERS  54000) 


ATTACH,GPSS. 

(WILL  GET  MORE  AS  NEEDED) 
REQUIRE  65000)  SEE  CCRM,  11-6 
ATTACH, MIMIC. 

SEE  CCPM,  4-76 
ATTACH, NETED. 

SEE  CCRM,  11-17 
ATTACH, PEPTC. 

ATTACH,  PERT 66, PPRTTIMF. 

ATTACH, PLl, IO=CSYS. 

ATTACH, RATFOR. 


SEE  CCPM,  11-19 
SEE  CCPM,  11-19 
MINIMUM  ATTACH,SNOBQL. 

minimum  see  CCRM,  11-19 


NOTFt  SOME  products  MAY  PFOUIPE  EITHER  CM  OR  DOTH  CM  AND  RFL. 
FOP  CATALOGRD  PROCFOupES  see  CCLI9  AND  CCLIP/P. 

FOR  PPUTTNFS  ON  UTILITY  LIPRAPY  CCRM,  10-70,  AND  CCIIR/U. 


FOP  <^PFCTAL  PRODUCTS  SEP  cCPM,  CHAPTER  11. 
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*****  JO"  PPOC'^SETNO  CONTROL  CAPPS  ***** 

***  INTPOOUCTION  *** 

THP  FOLLOWING  JOB  CAPO  PrOUIPENFNTS  APPLY  AT  OTNSPDC  SITE* 

G700  - 9LUE 
GGOO  - LAVFNOFP 
f-ROn  - ORANGE 

NO  OTHFP  CAPpS  IN  THE  OFCK  SHOULD  "E  ANY  OF  THE  ABOVE  COLORS. 

AT  OTNSPnc  SITE  USEP  NAME  AND  CODE  MUST  BE  ON  JOB  CARO  AS  COMMENTS. 

COME  REMOTE  sites  have  OTHFP  STANDARDS  FOR  COLOR  OF  CARDS  USED  OP 
FOP  NAME  flNO  CODE  INEOPMATICN  PLACEMENT  ON  THE  JOB  CARD. 


THE  SECOND  CAPO  MUST  BE  THE  CHARGE  CARD.  OTHER  CONTROL  CARDS 
FOLLOW. 


ALL  CONTROL  CARDS  BEGIN  IN  COLUMN  1 OF  THF  CARD  AND  UNLESS 
OTHFPHTSF  INDICATED  HAVE  NO  EMBEDDED  BLANKS.  A PERIOD  OR  CLOSE 
PAPEMHFSIS  MUST  TERMINATE  THE  CONTROL  CAPO  PARAMETERS.  EACH  CONTROL 
CARD  IS  A request  FOP  THE  SYSTEM  TO  LOAD  AND  EXECUTE  A PROGRAM  CE  THAT 
NAME. 


ON  THE  CDC  NOS/BE  SYSTEM  ALL  CONTROL  CARDS  ARE  PLACED  IN  THE  FIRST 
RECORD  (THAT  IS,  THE  SEQUENCE  or  CONTROL  CARDS  IS  TERMINATED  BY  AN 
ENC-CE-RECORD  CARD,  WHICH  CONTAINS  A 7/B/9  PUNCH  IN  COLUMN  1). 

SUPSEQUENT  RECORDS  ARE  DATA  WHICH  THE  CONTROL  CAROS  MUST  PROCESS. 

A green  END-OE-EILE  card  (6/7/B/B  PUNCH  IN  COLUMN  1)  WILL  BE  ADDED 
AT  FKO-OE-OECK  by  ADP  control  IE  NOT  ALREADY  PRESENT. 


NO  CHAPACTERS  ON  PAGE  1-10  (DISPLAY  CODE  GREATER  THAN  S7)  SHOULD  BE 
USED  ON  ANY  CONTROL  CARO  OP  mes'^AGp  TO  THE  OPERATOR. 


REFUNDS  ON  LOST  TIME  APE  DEEINED  IN  POLICY.  REQUESTS  MUST  BE 
ACCCMPANTED  RY  output  of  THF  RUN,  USER  TROUBLE  FORM  (CCRM,  13-1),  AND 
SHOULD  PE  FILED  WITHIN  FIVE  WORKING  DAYS.  DECISIONS  ON  REFUNDS  WILL 

BE  made  by  code  l«q. 
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CONTROL  CARD  FORMATS  **• 

A CONTROL  CARD  HAS  ONF  OF  THF  FOLLOWING  FORMS  (HERE  AND  THROUGHOUT 
THI'^  manual,  WHFN  a word  or  phrase  is  enclosed  in  <...>  (E.G.,  <LIST>), 
THF  <>  ARF  NCT  part  OF  THE  STRING)! 


EXAMPLES 


pRpr . 

RPrn,<FnSTTIONAL-PAPt,MFTFRS>. 
PPrr,<KFVWriRn-PARAMPTFRS>. 
PRCG,< POSITIONAL, KEYWORD*. 
,<LIST>. 


REDUCE,  SUMMARY 
CHARGE,  SKIPF 
AUDIT,  LDSET,  UPDATE 
catalog,  DISPOSE,  FILE 
RFTURN,  REWIND,  SYSBULL, 


UNLOAD 


• PROG • 


IS  THE  NAME  OF  THE  RROGRAM  OR  COMMAND. 


<PCSTTT0NAL-PARAMFTPRS>  is  a STRING  WHOSE  ENTRIES  MUST  BE  IN  A 

SPECIFIC  ORDER.  OMITTED  PARAMETERS  ARE 
INDICATED  BY  2 SUCCESSIVE  COMMAS. 


<kfyv.oro-paramftprs> 


IS  A STRING  WHOSE  ENTRIES  ARE  IDENTIFIED  BY 
NAME  OP  NAMF=VALUE  (E.G.,  AI=I,  ID=XXXX)  AND 
MAY  BE  IN  ANY  ORDER. 


<PPFTI TONAL, KEYWORD* 


IS  A STRING  OF  BOTH  POSITIONAL  AND  KEYWORD 
PARAMETERS.  WHFN  A CONTROL  CARD  HAS  ANY 
POSITIONAL  parameters,  THEY  MUST  APPEAR  BEFORE 
ANY  KEYWORD  PARAMETERS. 


<L  I'^T* 


IS  A STRING  OF  UNRELATED  PARAMETERS  WHOSE 
POSITION  IS  UNIMPORTANT. 


MO'^T  CONTROL  CARDS  MAY  NOT  BF 
ATTern,  catalog)  are  continupp  by 

COMFLETE  pflOflMFTEP  (INCLUDING  THF 
OAPAHEICP  ON  THP  NEYT  CARO. 


CONTINUED. 
ENDING  THE 
COMMA)  AND 


THOSE  WHICH  MAY  (F.G., 
FIRST  CARD  AFTER  A 
BEGINNING  THE  NEXT 
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***  JOn  CAPO  *** 

7HF  JOB  CAPB  IS  THF  FIPST  CARD  OF  THE  JOB  AND  OFFINFS  THE  J09  NAMr 
ANT  f'ACHiNE  PPQUTPFMFNTS  AS  WELL  AS  THF  PUNCH  MODE  (WHEN  THF  JOB  IS  A 
CAPO  DECK*.  IT  HAS  THF  FORMt 

JOPNAMF,CM«*60'’0,Tlft0,  1077777, MTl,  NT1,P3,CPX,RP1  »0Z2NN.  9999  NAMF  KP 

JOPNAMF  A ti-  TO  7-CHARACTFP  NAME  OF  THF  FORM  XXXXYYY 

XXXX  - USER'S  REGISTFPEO  INITIALS 

(CONTACT  CODE  1891  OR  1892  TO  REGISTER  AS  A 
COMPUTER  USER) 

YYY  - selected  by  THF  USER 

CHARACTERS  G AND  7 OF  THE  JOB  NAMP  ARE  MODIFIED  BY  THE  NOS/BE  SYSTEM. 

NOTFt  SOME  remote  INSTALLATIONS  MAY  ALTER  THE  FORMAT  OF  THE  JORNAMF 
AND/OR  comments  FIELD  (9999  NAMF). 

OTHER  parameters 

IN  THE  FIELDS  BELOW,  TH^  IDENTIFYING  LETTERS  MUST  PREFIX  THF 
NUMBERS.  UNNEFDEO  FIELDS  MAY  BE  OMITTED,  BUT  NO  EMBEDDED  BLANKS. 
PARAMETERS  FOLLOWING  BLANKS  ARE  IGNORED  AND  DEFAULT  VALUES  APE  USED. 

CM  MAXIMUM  CENTRAL  MEMORY  (OCTAL)  PEOUIRED  BY  JOB.  MAY  NOT  EXCEED 
TOOOOO.  (DEFAULT!  46000) 

T TOTAL  JOB  TIME  IN  DFCTMAL  SECONDS,  AT  6400  CPU  RATE. 

(DEFAULT!  180) 

in  TOTAL  10  TIME  IN  DFCTMAL  SECONDS.  (DEFAULT!  INFINITY) 

MT  number  of  7-TRACK  MAGNETIC  TAPE  DRIVES  REQUIRED  BY  JOB. 

(MAXI  T ON  6700:  2 ON  66t'0/6400  ) 

NT  NUMBER  OF  9-TRACK  MAGNETIC  TAPE  DRIVES  REQUIRED  BY  JOB. 

(MAXI  2 ON  6700?  0 ON  6600/6400) 

P PRIORITY  OF  JOB  ELIGIBILITY 

4 EXPRESS  CM<100000  WITH  T<?00.  (MAX!  MT?) 

7 REGULAR  CM<1000t;0  WITH  T<3600.  (DEFAULT) 

2 DEFERRED  OR  OVERNIGHT  IF  LESS  THAN  2 HOURS  WALL  CLOCK 

EMERGENCY  BY  SPECIAL  WRITTEN  REQUEST  ONLY,  SEE  POLICY 

(SPE  POLICY  FOR  ADDITIONAL  CM  AND  TIME  COMBINATIONS  FOR  P3,  P4) 

CP  SELECT  A SINGLE  CPU  FOR  WHOLE  6700  JOB!  "A"  FOR  6600,  "B"  FOR  6400 
THROUGHPUT  IS  USUALLY  BETTER  WHEN  SYSTEM  SELECTS  OWN  CPU. 

CPB  IS  MORE  EFFICIENT  FOP  FORTRAN  COMPILATIONS. 

RP  NUMOER  OF  DEVICE  SET  DRIVES  REQUIRED  BY  JOB 

(MAXI  1 IN  PRIME  time:  2 IN  NON-PRIME  TIMET  NONE  POP  P4 ) 

D USED  WITH  JOB  DEPENDENCY  (SEE  NOSBF,  4-86?  SCOPE,  4-54) 

qqoq  USER'S  ORGANIZATION  CODE,  BEGINNING  ABOUT  COLUMN  60. 

NAMF  USER'S  NAME  FOP  I DFNT IF IC AT  I ON  OF  OUTPUT,  IF  AT  DTNSRDC. 

KP  COLUMNS  79-80 

CMTTTED  OR  26  - CONTROL  CARDS  (OR  ENTIRE  JOB)  PUNCHED  IN  026  MODE 
29  - CONTROL  CARPS  (OR  ENTIRE  JOB)  PUNCHED  IN  029  “ODE 


default  job  card 

XXXX.  IMPLIPS  XXXXOOO,CM46000,T180, 1077777, MT0,NT0,P3,RPP- 
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JOB  CAPO  (CONTINUFO) 

JOBS  WAITING  TO  BE  PUN  ARF  OIVIOFO  INTO  GPOUPG  ACCOPOING  TO 
PEOUIPFD  HARDWARE  (TAPESI  AND  PRIOPITY  (P).  CM  AND  T PARAMETERS  ON 
THE  JOB  CARO  SPECIFY  MAXIMUM  CENTRAL  MEMORY  IN  OCTAL  AND  CENTRAL 
PROCESSOR  TIME  IN  DECIMAL  6400  SECONDS  FOR  EACH  JOB.  THESE  PARAMETERS 
ALONG  WITH  P DETERMINE  WHEN  A JOB  MAY  BE  SELECTED  FOR  EXECUTION.  IF 
THE  CM  OR  T PARAMETERS  EXCEED  THE  ALLOWED  SI7E  FOR  A GIVEN  P GROUP  THE 
P IS  REDUCED.  P«*  JOBS  IN  THE  INPUT  QUEUE  AR*^  INITIATED  BEFORE  ANY  P3. 

WITHIN  PRIORITY  GROUPS,  JOBS  WITH  LOW  CM  AND  LOW  T APE  SELECTED 
FIRST  SINCE  EACH  PRIORITY  GROUP  IS  SUBDIVIOEO.  COPE  SUBDIVISIONS  OCCUR 
AFTER  46000,  60000,  100000  AND  120000.  TIME  SUBDIVISIONS  OCCUR  AT  40, 
100  AND  200  SECONDS. 


CHARGE  card 


FOP  EACH  JOB,  AN  ACCOUNTING  ROUTINE  VALIDATES  THE  USER  AND  COMPUTER 
ACCESS  NUMBER  TO  VERIFY  THAT  THERE  APE  FUNDS  AVAILABLE  AND  THE  USER  IS 
authorized  to  utilize  THOSE  FUNDS.  TO  OBTAIN  A COMPUTER  ACCESS  NUMBER, 
A DTNSRDC  JOB  ORDER  NUMBER  MUST  BE  REGISTERED  WITH  OR  ORTAINED  FROM 
COOE  IftBl,  (202)  227-1361. 


THE  CHARGE  CARO  IS  THE  SECOND  CARO  OF  THE  JOB  AND  HAS  THE  FORMt 
CHARGE, XX XX, J J JJ J J J J J J, OP . 

THE  fields  following  THE  WORD  CHARGE  ARE  POSITIONAL. 

XXXX  USER'S  DTNSRDC  REGISTERED  USER  INITIALS 

(E.G.,  AMDS,  CASG) 

JJJJJJJJJJ  TEN  CHARACTERS  OF  COMPUTER  ACCESS  NUMBER  WITH  NO 
blank,  DASH  OR  MINUS 


OP 

TYPE  OF 

RUN  (OPTION 

DC 

CODE  check 

PP 

PRODUCTION 

PS 

PFSF  ARCH 

(DEFAULT) 
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*♦*  PRIV4TF  *** 

TMF  CONTROL  CftRO  PRIVATE.  MAY  OF  USFO  TO  lOFNIIFY  PPIVATF  MATERIAL 
<PRIKTCUT'^»  . EACH  PRIVATE  PRINTOUT  WILL  OF  lOFNTIFIFO  AS  SUCH  AT  THE 
RFCIKNING  AND  FNO  OF  THE  PRINTOUT. 


DRIVATF.  eppaTF  a HANNFP  PAGE  CONTAINING  THE  WORD  PRIVATE.  WHEN 

PRIVATE, LFN.  lFN  IS  OMITTED,  THE  DANNER  IS  PUT  ON  FILE  OUTPUT:  A 

SIMILAR  DANNER,  SURROUNDED  BY  A BOX  OF  STARS,  IS  PUT  INTO 
the  OAYFTLF.  this  CAPO  SHOULD  FOLLOW  THE  CHARGE  CARD. 

WHEN  LFN  IS  SPECIFIED,  THE  DANNER  IS  PUT  ON  FILE  LFn; 

THERE  IS  NO  OAYFILF  MESSAGE.  THE  SECOND  FORM  SHOULD  BE 
USED  ONCE  RFFORE  ANYTHING  IS  WRITTEN  ON  LFN  AND  AGAIN 
after  LFN  IS  complete.  LFN  CAN  THEN  BE  ROUTED  OR  DISPOSED 
TO  A PPINTFR. 


AT  CENTRAL  SITF,  PRINTOUTS  WITH  THESE  DANNERS  WILL  NOT  BE  PLACED  INTO 
THE  “PUBLIC"  OUTPUT  DINS.  THEY  MUST  DE  OBTAINED  AT  THE  DISPATCH  WINDOW 
BY  A PROPERLY  IDENTIFIED  AND  AUTHORIZED  REPRESENTATIVE.  ANY  SCRAP 
OUTPUT,  RESULTING  FROM  FORMS  ALIGNMENT,  JAMS,  ETC.,  WILL  ALSO  BE 
RETURNED  WITH  THE  USABLE  OUTPUT. 


EXAMPLES 


1.  OUTPUT  FILE  IS  TO  BE  PRIVATE 

JODCARD 
CHARGE  CARD 
PRIVATE. 

• • • 

" 6/7/H/9  EOF 


?.  PRIVATE  file  pfILE  is  to  BE  DISPOSED 

JODCARD 
CHARGE  CARD 

...  ANY  COMMANDS  NOT  USING  PFILE  MAY  OCCUR  HERE 
PRIVATF, PFILE. 

ATT  ACH, ANY,MYPRIV ATEFILF, 1 0 = X X XX , PW  = RE A D. 

rOPYF, ANY, PFILE.  4 

PRIVATE, PFILE. 

ROUTE, PFILE,DC=PR,TID=C.  OR  DI SPOSE , PF ILE , PR=C. 

• • • 

“ 6/7/a/O  EOF 


k 
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OTHER  NOS/BE  CONTROL  CAROS  *•* 


CLEAR.  UNLOAO  ALL  FILES  EXCEPT  'INPUT*  AND  'OUTPUT*. 

TO  UNLOAO  ALL  FILES  INCLUDING  'INPUT*  AND/OP  'OUTPUT',  IT 
OR  THEY  MUST  BE  SPECIFICALLY  LISTED.  NOTE  THAT  'INPUT' 
WILL  BE  IGNORED  IN  BATCH. 


COPPFNT.  FOR  INSERTION  OF  COMMENTS  INTO  CONTROL  CARD  RECORD. 

IT  WILL  BE  DISPLAYED  IN  OAYFILE  AT  OPERATOR'S  CONSOLE. 
DOES  NOT  FLASH  FOR  OPERATOR  ACTION. 


OMP,LLLLLL. 

OMP.FFFFEF.LLLLLL. 

OUMO  FROM  RELATIVE  OCTAL  ADDRESS  FFFFFF  THRU  LLLLLL. 

IF  FFFFFF  IS  OMITTED,  0 IS  USED.  WILL  STOP  AT  CURRENT 
FIELD  LENGTH  »FL). 


EXIT.  WHEN  THERE  IS  AN  ABNORMAL  END  TO  PROGRAM  EXECUTION, 

THE  CONTROL  CARDS  FOLLOWING  THE  EXIT  CARO  WILL  BE  EXECUTED 
FOR  EXAMPLE,  EXIT. 

DMP(0,2S000) 

EXIT,S.  IF  IT  IS  DESIRED  TO  EXECUTE  ADDITIONAL  CAROS  AFTER  AN 

ABNORMAL  ENDING  DURING  COMPILATION  OR  SIMPLE  CONTROL  CARDS 
WITH  ILLEGAL  POSITIONAL  PARAMETERS,  THESE  CARDS  MUST 
FOLLOW  AN  'EXIT,S.'.  COMPILER  ERRORS  WILL  NOT  CAUSE  A 
BRANCH  TO  'EXIT.'.  ANY  ERROR  WHICH  BRANCHES  TO  'EXIT.' 
WILL  EXECUTE  'FXIT,S.'  IF  IT  IS  ENCOUNTERED  FIRST. 


EXIT,U.  IF  IT  IS  DESIRED  TO  EXECUTE  ADDITIONAL  CARDS  REGARDLESS  OF 

WHETHER  THE  JOB  RAN  OR  NOT,  THESE  CARDS  MUST  FOLLOW  AN 

•EXIT,U.  '. 


LIMIT, SI7E.  WHERE  S I 7F  IS  OCTAL  NUMBER  OF  BLOCKS  OF  G9  PRU'S  (A09G 

WORDS).  DEFAULT  MASS  STORAGE  IS  1600  OCTAL  BLOCKS  (67,344 
PRU'S).  the  maximum  IS  13000  OCTAL  BLOCKS  OR  1,300,000 
OCTAL  (360,44ft)  PRU'S  ( LI MI T , 1 3 0 0 0 . ) . TO  KEEP  A JOB  FROM 
GENERATING  TOO  MUCH  OUTPUT,  THE  LIMIT  MAY  BE  SET  LOWE®. 

THE  TOTAL  ALLOWED  MASS  STORAGE  IN  USE  IN  A JOB  INCLUDES 
TNRIJT  FILES,  OUTPUT  FILES,  ATTACHED  PERMANENT  FILES,  AND 
SCRATCH  files.  return  OP  UNLOAD  MAY  BE  USED  TO  DECREMENT 
THF  MASS  STORAGE  IN  USE.  DISPOSE  CARDS  DO  NOT.  INPUT 
FILES  are  about  FIGHT  CAROS  PER  PRU,  AND  OUTPUT  FILES  ARE 
FIVE  TO  TEN  LINES  PER  ppu. 


MnrF,N.  mode  error  bypass  is  not  for  USE  AT  DTNSRDC.  ATTEMPT  TO 

IGNORE  ERROR  MDDF  1 MAY  CAUSE  MODE  0. 
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PPNT^dY<LPM)  print*^  out  thp  pfsults  of  spy.  it  reaos  the  temporary 

PPKTSPY.  FTLP  ’noSSTER*  AND  THE  FILE  *LFN'  CONTAINING  THE 

RFLOCATAPLP  OINARY  PROGRAM  UNDER  SCRUTINY.  IF  LFN  IS 
SPPCIFTFP,  THF  listed  ADDRESSES  ARE  RELATIVE  TO  EACH 
SURPROGRAM:  if  omitted,  they  are  relative  to  pa.  if 

MULTIPLE  SPY  PUNS  ARE  MADE  IN  ONE  JOB,  • RE T URN, DOSS  I FP . ' 
MUST  BE  specified  AFTER  EACH  *pRNTSPY'  TO  AVOID  OUPLlCATf 
OUTPUT.  (SEE  CCRM,  SPY?  CONV,  CHAPTER  11) 

RECL'FST,LFN,  *0. 

PUT  LFN  ON  A QUEUE  DEVICE.  USED  BEFORE  CREATING  A FILF  TO 
BE  ROUTED  (CCRM,  2-10)  OR  DISPOSED  (CCRM,  2-S).  FOR  OTHER 
FORMS  OF  THE  REQUEST  CARO,  SEE  CCRM,  3-5,  3-11,  3-17. 


REWIND (LEN1,LFN2, . .. ,LENN) 

REWIND(LFN)  rewind  DISK  OR  TAPE  FILES 


UNLCAO (LEN1,LFN2,. . . ,LENN) 

UNLCAO(LEN)  rewind  and  UNLOAD  TAPE  SO  OPERATOR  MAY  REMOVE  IT  FROM  TH>^ 
TAPE  DRIVE.  THE  JOB  CARD  MT/NT  COUNT  IS  NOT  DECREASED,  SO 

another  tape  may  be  mounted. 


RETURN (LEN1,LEN2, . . . ,LENN) 

RETURN(LFN)  rewind  and  unload  TAPE  AND  RETURN  TAPE  DRIVE  TO  SYSTEM  FOR 
REASSIGNMENT.  SHOULD  BE  USED  AS  SOON  AS  TAPE  USAGE  IS 
COMPLETED.  THE  JOB  CARD  MT/NT  COUNT  IS  DECREASED. 

TO  DETACH  A DISK  FILE  FROM  USER  JOB,  EITHER  RETURN  DR 
UNLOAD. 

DO  NOT  USE  BOTH  RETURN  AND  UNLOAD  ON  THE  SAME  TAPE. 

AT  END-OF-JOB,  ALL  DISK  FILES  ARE  AUTOMATICALLY  RETURNED; 
TAPES  ARE  UNLOADED  AND  RETURNED. 


SUMMARY,  THE  ACCOUNTING  SUMMARY,  UP  TO  THE  CURRENT  POINT  IN  THE 

JOB,  IS  PUT  INTO  the  USER'S  OAYFILE. 


SYSBULL (<BLIST>)  PRINT  THE  SYSTEM  RULLETIN(S)  SPECIFIED. 

THREE  BULLETINS  ALWAYS  EXIST* 

INDEX  - LIST  OF  ALL  BULLETINS  CURRENTLY  AVAILABLE 
(DEFAULT  IE  <RLIST>  OMITTED) 

BATCH  - PRINTED  AFTER  THE  BANNER  PAGE  OF  ALL  BATCH  JOBS 
LOGIN  - TYPED  AT  INTERCOM  LOGIN  TIME 
‘BATCH*  AND  'LOGIN*  MAY  REFER  TO  OTHER  BULLETINS  WHICH  THE 
USER  SHOULD  PRINT.  'SYSBULL, ALL . ' WILL  PRINT  AIL 

bulletins. 


TRANSE,XXXXX 


SUBTRACT  1 FROM  THE  0 COUNTER  FOR  JOB  XXXXX  IN 
DFPPNOENCY  SET.  IE  COUNTER  IS  THEN  0 IT  MAY  EXECUTE 


fl  JOn  IS  TFRHINftTFO,  THE  DISPOSE  C4RD  Mfty  BE  USED. 

IT  HAY  BE  USED  TO  SPECIFY  SPECIAL  PRINT/PJNCH  FORMS. 
SEE  ALSO  'ROUTE'  (CCRM,  2-10). 


LFN  is  name  OF  THE  LOGICAL  FILE  TO  BE  RELEASED  (IF  PF  NAME,  THE  | 

CARO  HILL  BE  IGNORED)  WHEN  X IS  OMITTED,  CARO  ACTS  AS  A ^ 

RETUi^N.  LFN  must  PE  ON  A QUEUE  DEVICE  (SEE  CCRM,  2-7).  | 

X INDICATES  TYPE  OF  OUTPUT  DEVICE  (SEE  NOSBE,  4-27;  SCOPE,  i*-Sl)  I 

SUCH  AS  PR  FOR  PRINTER 

PU  FOR  PUMCHFD  HOLLERITH  CAROS 

PP  FOR  PUNCHED  BINARY  CARDS  I 

P>)  FOR  PUNCHED  >)0-COLUMN  BINARY  i 

PT  FOR  1700  CALCOMP  PLOTTER 
TA  FOR  PAPER  TAPE  ASCII  ( 170  0 ONLY) 

TP  FOR  TAPE  BINARY  (1700  ONLY) 

(NOTE!  PAPPR  TAPE  FILES  MAY  NOT  BE  DISPOSED  TO  CENTRAL  SITE.)  ^ 

K MAY  BE  ONE  OF 

C - niSPOSF  TO  central  site 

I - DISPOS‘D  TO  INTERCOM  TERMINAL  ( 1700,  200,  TTY) 

Y WHPN  X=c,  Y MAY  BE  ONE  OF  THE  CHARACTER  PAIRS  ON  PAGE  2-9 
TO  specify  SP'^riAL  FORMS.  WHEN  Y IS  OhITTED,  OUTPUT  IS  ON 
STANDARD  FORMS. 

WH^N  K=I,  Y must  BF  a 2-CHARACTER  terminal  id  (CCRM,  12-1). 

ONLY  PR  (PRINT)  OUTPUT  MAY  BE  DISPOSED  TO  A TTY. 

IF  KY  OMITTED,  THE  FILE  IS  DISPOSFO  ’’0  THE  SAME  USER  (INTERCOM 
ONL  Y ) 

DTSPCSr.LFN.  WILL  EVICT  FILE  LFN  FROM  THE  SYSTEM.  IF  FILE  WAS  % 

OUTPUT,  PUNCH  OR  PUNCHB,  IT  IS  LOST  (NOT  PRINTED  > 

OR  PUNCHED). 

FXAMPLES 


OT<^FCSE, OUTPUT. DR  = C.  CUPPENT  CONTENTS  OE  FILE  OUTPUT  GO 

TMMEOIATELY  I^TO  CENTRAL  SITE  PRINT  QUEUE. 
WILL  PRINT  ON  ONE  PART  UNLINED  PAPER, 

DO  NOT  USE  CIP  FOR  THIS. 

ni'^FrSP,ANYEIL,PR  = CTP.  PRINT  ON  THREE-PART  CARBON  AT  CENTRAL. 

OT'^CC'^'^  .OUTPUT, OR=IAF.  CURRENT  CONTENTS  OE  FILE  OUTPUT  GO 

IMMEDIATELY  INTO  PRINT  QUEUE  FOR  NAVSEC. 

EVEN  IF  THIS  IS  LAST  CONTROL  CARD,  DAYFILE 
IS  NOT  niSPOSED. 

"I‘^FCSP,HVFr(_r,pp=lve,  SEND  PRINT  file  to  200UT  WITH  ID  YB. 

0ISP0ST,ANYFTL,RR=TPF.  create  REMOTE  OUTPUT  FILE  AT  TERMINAL  EE. 

TELETYPE  USER  MUST  USE  8 A TCH , LF N, L OC A L 
TO  RETRIEVE  FILE  FOR  LISTING. 

OI''PDST,ANvriL,PU  = C.  PUNCH  OCO  DECK  FROM  ANYFIL  AT  CENTRAL  SITE. 

OI'PESF  ,SOMFIl,piJ=IAE.  punch  DPCK  FROM  SOME  TL  AT  ANNAPOLIS  1 700  . 

DTSPOSp.myfilp.pp.  TNTEPCOM  ONLY.  CREATE  REMOTE  OUTPUT  FILE  AT 

SAME  TPPMINAL. 
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SPECIAL  POPMS  CODES 


Y FOP  SPECIAL  PRINT  FORMS  SHOULD  PE  ONE  OE  THE  CMAPACTEPS  PAIRS! 


IP  ONE-PART  UNLINEO  PAPER 

PD  TWO-PART  PLAIN 

TP  three-part  PLAIN 

UP  EOUP-PAPT  PLAIN 

IL  ONE-PART  LINED  (14  7/8  PY  11) 

?L  TWO-PART  LINED 

7L  THREE-PART  LINED 

4L  FOUR-PAPT  LINED 

1C  ONE-PART  CONFIDENTIAL 

IS  ONE-PART  SECRET 

IT  ONE-PART  TELETYPE  (NARROW)  (<72  COLUMNS) 

TT  THREE-PART  TELETYPE  (NARROW)  (<7?  COLUMNS) 
MU  BLANK  MULTILITH  (14  7/8  BY  10) 

BS  RFPORT  DISTRIBUTION  ENVELOPES 

BL  LABELS  (?  ACROSS)  SUPPLY 

CO  3 X B CARDS 

PA  FOUR-PART  PAYROLL 

V?  NARROW  MULTILITH  (10  BY  12)  10  BY  12  LOOP 

XT  STD  1080  form  (B-PAPT) 

X4  LABELS  (T  ACROSS) 

TE  PAYROLL  FORM 

ED  PAYROLL  FORM  (EARNING  AND  DEDUCTION) 

W2  PAYROLL  FORM  (IRS  W-2) 

XI  PAYROLL  FORM  (FICA) 


Y FOR  SPECIAL  PUNCH  CARD  STOCK  SHOULD  'BE  ONE  OF! 

PS  TRANSACTION  CAROS 

PH  ANNAPOLIS  TRANSACTION  CARDS  (CLOCK) 
NS  SUPPLY  RECEIPT 

N1  SUPPLY  ISSUE 

N2  SUPPLY  REQUISITION 

N4  MILESTONE 


ADDITTCNAL  SPECIAL  pORMS  MAY  BE  ASSIGNED  IE  FREQUENTLY  USED. 
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* • ♦ »nuTf  * * * 

TWf  OQUrr  rONT'^OL  rA'->n  is  USin  for  HIPFCTING  the  GISPOSITICN  and 
OEEIMNG  the  CHAPAniFPlST  ICS  HE  A FILE. 

THF  PCtITP  DISPOSITION  niRFCTiyrS  INCt.’JDF  SFLFCUON  OF  THE  TFPHINAL 
TO  FPOCESS  THF  OUTPUT  AND  SPECIFYINC  THF  FORMS  ON  WHICH  THE  FILF  IS  TO 
OF  OUTPUT.  (THFSF  ARF  ALSO  AVATLAOLE,  lO  A DEGREE,  ON  THF  'DISPOSE' 
control  capo.)  NOTF  that  WITH  THE  POU’'F  COHHANO,  SPECIAL  FORMS  tSUCH 
AS  MULTIPLF-pAPT  PAPER)  MAY  NOT  DF  SPECIEIFO  AT  PFMOTf  SITfS  (SEF  CCPM, 
lU-3  FOP  'PM').  IN  APDTTION,  THF  C H AP A CT E R I S T I CS  PARAMETERS  DEFINE  THE 
COPING  (INTERNAL)  AND  THE  PRINT  TRAIN  OR  PUNCH  CODE  TO  RE  USED. 

THF  RF'UTE  OOMMANO  HAS  THE  FORM: 

ROUTE.lFN,  fPARAMFTFPO. 

IMF  FILE  PFING  ROUIFO  MUST  PE  ON  A OUF  UF  OE'/ICE.  IF  NOT,  'ROUTE'  WILL 
COPY  TT  RFFOPF  routing.  FOR  pFTTER  PERFORMANCE,  USE  A ' REQUEST , LFN , *0  ' 
CARP  (CCRR,  7-7)  PFEORE  CRfATTNG  THf  F i u E . ALL  PAPAMETEPS  ARE 
optional.  in  general,  T.F  A PARAMETFR  IS  OMITTED,  IT  RETAINS  THE 
OFFTMTION  FROM  THE  LAST  ROUIF  PAPn  WHICH  REFERENCED  THAT  L^N  (THF 
FyCFFTIDN  IS  THE  'DFF'  PARAMETER). 

ROUIF  PAPAMEIFPS 

dtffcsiticn  code 

PC=TV  file  description,  WH( RF  XX  IS  ONE  DE 

EL  - Elt  MFL 
FP  - FILMPR 

IN  - PLACE  THF  FILE  In  THE  INPUT  OUEUF 
PR  - ANY  PR  TNTE  R 
PI  - 1700  on-line  plot 
PU  - PUNCH 

SC  - EVICT  (SCRATCH)  THF  FILE 

THE  KEYWORDS  ETD,  FC  APE  IGNORED  WITH  NO  WARNING 
‘MESSAGE  WHFN  DC=TN.  IF  PC^IN  AND  DEE  ARE  DOTH 
SPFriEIEn,  THE  POUrE  command  is  not  ExeeutFO. 

PC  same  as  DC-SC 

AFSFN'T  SAME  fis  PREVIOUS  REI-kpEnee  TO  THIS  LEN  ON  A ROUTE 

CARP.  IE  NONE,  SAME  AS  DC~SC,  EXCEPT  FOR  THE  FOLLOWING 
RDECTAL  file  NAMES! 

FPECif.u  LFN  ASSU^FO  DC  ASSUMED  FC 


<■  TL  “R1 

E|. 

F TL  MRR 

FP 

DU1 PUT 

Pp 

PLOT 

P I 

PUNCH 

PU 

I?!’. 

(DCO  - DFEAULT) 

PUNCH 

r-U 

(WHEN  rc-0?o  USED  — 

CENTPAL  SITE  CNL Y ) 

P UN  C H n 

PU 

so 

(BINARY) 

p <<f)  r 

Pij 

HOSOI, 

(«0-COLUMN  BINARY) 

A OIGPOSiriDN  CODE 

MEED 

NOT  9F  SPECIFIED  F OR  A SPECIAL 

FILE  NAMf.  nc-sc 

pppcFSEED. 

MAY  P F 

USED  TO 

prevent  the  file  FPOM 
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nFFPCPfO  FTLF  ROUTING  (BATCH  ONLY) 

FPF  FTLF  OTSDOSITION  IC  DFFERBFD  UNTIL  FND  OF  JOB.  OFF 

MUST  BF  SPFCrFIFP  ON  FACH  ROUTE  CARO  IF  ENO-OF-JOB 
PROC^BSING  IS  INTENDED.  OFF  AND  DC=IN  MAY  NOT  BF  USFO 
TOGFTHFP . 

APSFNT  file  DISPOSITION  TAKES  PLACE  IMMEDIATELY.  THE  FILE 

IS  NO  LONG'^R  AVAILABLF. 


TFPMINAL  TOFNTIFICATION 


Tin 

RETURN  EILF  TO  JOB 

ORIGIN 

T n=r 

OUTPUT  THE  FILE  AT 

central 

SITE 

TTO  = AA 

ROUTE  THE  FILE  TO 

IN  TEPCOM 

TERMINAL  WITH  IQ  QF 

APSFNT 

sff  note  below 

FTLF  TDEnTIFICATION 

FID  THF  file  name,  WHILE  IN  THE  OUTPUT  QUEUE,  IS  THE  SAME  AS 

THE  JOB  NAME 

FID=*  AS  ABOVE,  ONLY  THE  6TH  AND  7TH  POSITIONS  ARE  REPLACED 

BY  2 UNIQUE  SEQUENCE  NUMBERS.  WHEN  FTO=*  IS  USED,  THE 
file  NAME  SENT  IS  LISTED  IN  THE  DAYFILE.  WHEN  ROUTING 
TO  DC=TN,  ONLY  THE  LAST  2 CHARACTERS  OF  THE  LISTED  FILE 
NAME  HAVE  MEANING. 


ABSENT  SEE  NOTE  BELOW 

EXAMPLE!  ASSUME  FILENAME  = JOBNAME  = ABCOE3P. 

ASSUME  NEXT  SEQUENCE  NUMBER  IS  4G. 
AFTER  FID  — ABCDEIP 
AFTER  EID=*  — ABCDE4G 


FORMS  CODE 
FC=WW 


(CENTRAL  SITE  ONLY) 

USE  SAME  CODE  FOR  PRINTER  AND  PUNCHED  OUTPUT  AS 
given  for  'DISPOSE'  COMMAND  ON  PAGE  ?-B 


EC 


USE  STANDARD  CARD  OR  PRINT  FORMS 


APSFNT  SEE  NOTE  BELOW 


REPfaT  COUNT 
PFPrNN 


(CENTRAL  SITE  AND  BOO-UT-TYPE  ONLY) 

NN  IS  NUMBER  OF  EXTRA  COPIES  FOR  OUTPUT  FILES 
(DEFAULT!  0) 


NOTF!  WHFN  fILF  identification,  FORMS  CODE  AND/OR  TERMINAL 

IDFNTIEICATION  is  omitted,  it  is  THE  SAME  AS  IN  THE  PREVIOUS 
PEEFocNf^F  TO  THF  lEN  ON  A ROUTE  CARO.  IE  OMITTED  ON  THE  FIRST/ 
ONLY  DOi)TF  CAPO  FOR  AN  LEN,  THE  DEFAULTS  ARE  FID,  EC,  TIO, 
RESPECTIVELY. 
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»»*  POUTE  EXftHPLES  * » * 

1.  SENO  ENTIRE  OUTPUT  ANO  DAYFTLE  TO  ANOTHER  TERMINAL  (EG,  AF». 

JOOOARn 

charge,  X XXX  .JJ.JJJJJJJJ. 

ROUTE, OUTPUT, OFF, OC=PP,TID=AE.  SET  TO  PRINT  AT  END  OF  JOO 

• • • 

• 7/8/0  FOR 

• • • 

••  G/7/8/0  FOE 

NCTF  THAT  THE  FILE  MAY  BE  REFERENCED  BEFORE  IT  IS  CREATED.  THE 
RCUTING  INFORMATION  IS  SAVFD  UNTIL  THE  FILE  IS  SENT  TO  THE  (REMOTE) 
Cl'TPUT  OUEUE. 


2.  FL'T  A JOB  INTO  THE  INPUT  QUEUE.  (THIS  IS  SIMILAR  TO  THE  INTERCOM 
'PATCH'  CCMHA‘"1.) 

JiOBCARO 

CHARGE, XXXX,JJJJJJJJJJ. 

COPYF, INPUT, FALCON. 

ROUTE, F ALCON,nC  = IN. 

' 7/8/0  EOP 

JOBCARO 

CHARGE,XXXX, JJJJJJJJJJ. 

• • • 

' 7/8/0  FOR 

fi/7/8/0  EOF 

3.  A USER  WISHES  TO  PRINT  FILE  'OUTPUT*  ON  3-PAPT  PLAIN  PAPER. 

ROUTE, OUTPUT, Tin=C, FC=3P.  SEE  PAGE  2-9 

A USER  MUST  PUNCH  FILE  'PUNCH'  ON  SPECIAL  CAROS  (EG,  SUPPLY  ISSUE). 

ROUTE, PUNCH, TID-C,FC=N1.  SEE  PAGE  2-0 

A USFR  WISHES  TO  PUNCH  FILE  'ANY*  AS  AN  020  DECK. 

ROUTE, ANY, 0C=PU,FC=P?0, Tin=C.  (CENTRAL  SITE) 

'PFr,IN,CV?0,  , ANY,AA.  (REMOTE  1700  WITH  TERMINAL  ID  'AA*) 

^FNC  A COPY  OF  THE  OUTPUT  FILE  TO  ANOTHER  TERMINAL  (EG,  AE). 

JOBCARO 

fhAR&E , XX XX, JJJJJJJJJJ. 

• • • 

PE  MI  NO, OUTPUT. 
rOPYF, OUTPUT , ANY. 

POUTF, any,OC=PR,TTO= AF. 

' 7/8/9  FOR 


COMPLETE  JOB 
TO  GO  INTO 
INPUT  QUEUE 


G/7/8/  ) 


EOF 


JUNF  l<177 


PRGF  ?-13 


»•*»•  LOftDFR  ***** 

THF  tnaOFP  IS  RFSPONSTBLF  FOP  LOADING  ALL  PPOGPAMS,  PFSOLVING  ANY 

fxtfrnal  pfffppnoes,  and  optionally  initiating  execution. 

CNOF  LOADING  OF  A PROGRAM  IS  STARTED,  NO  OTHER  CONTROL  CAROS  MAY 
interrupt  the  load  sequence.  fop  instance,  a »LOAO,LFN.'  CARO  MAY  ONLV 

BE  followed  by  another  •LOAO,LFN1.'  op  one  of  the  loader  control  rfiPRS 

ISFF  CCRM,  ?-lS,l6)  OR  'MAP*,  •REDUCE*  (SEE  CCRM,  2-lT,lA)  OR  OTHERS 
LISTED  IN  THE  LOADER  MANUAL. 

A LINE  AT  THF  END  OF  THF  LOAD  MAP  OF  A SIMPLE  OR  OVERLAY  LOAD 
CONTAINS  XXXXXX0  CM  USED  . THIS  IS  THF  MINIMUM  FL  NFFDFO  TO  LOAD, 

A SIMILAR  MESSAGE  IN  THE  OAYFILF  ALSO  GIVES  THE  PROGRAM  LENGTH.  USE 
this  INFOOMATION  to  save  CORE  ON  FUTURE  RUNS.  AT  PRESENT,  THIS 
INFCRHATION  IS  NOT  AVAILABLE  WITH  SEGLOAQ. 


*»*  TYPES  OF  LOADING  ••* 


LOADING  DIFFERS  ACCORDING  TO  WHETHER  THE  INPUT  IS  ONE  DR  MORE 
OBJECT  MODULES  OR  A SINGLE  CORE  IMAGE  MODULE.  LOADING  OE  OBJECT 
MODULES  CAN  INVOLVE  OVERLAY  OR  SEGMENT  GENERATION  AND  CAN  RESULT  IN  ONE 
OR  MORE  CORE  IMAGE  MODULES.  A BASIC  LOAD  RESULTS  IN  ONE  CORE  IMAGE 
(APSCLUTE>  MODULE. 


OBJECT  MODULE  LOADING  ONE  OP  mqhe  OBJECT  MODULES  ARE  LOADED, 

LIBRARIES  ARE  SEARCHED  EQR  THE  EXTERNAL 
REFERENCES,  ADDRESSES  ARE  ADJUSTED,  AND  A CORE 
IMAGE  MODULE  MAY  BE  PRODUCED. 


COPE  image  loading 


THIS  IS  A SPECIAL  CASE  BECAUSE  NO  EXTERNAL 
LINKAGE  OR  ADDRESS  ADJUSTMENT  IS  REQUIRED. 


BASIC  LOADING 


ALL  OBJECT  CODE  IS  LOADED  AT  THE  SAME  TIME, 
RESULTING  IN  A SINGLE  CORE  IMAGE  MODULE. 
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SFGPFNT  AT  ION  FOR  LARGE  PPOGRANS,  SEGMENTATION  SHO'JLU  IE  USFO 

TO  OIVTDE  the  PROGRAM  INTO  SEVERAL  CORE  IMAGE 
MODULES,  CALLED  SEGMENTS. 

WITH  SEGMENTATION,  ONLY  THOSE  PORTIONS  OF  THE 
PROGRAM  NEEDED  AT  A GIVEN  MOMENT  ARE  IN  CORF. 
DIFFERENT  CORF  IMAGE  MODULES  RESIDE  IN  THE  SAME 
AREA  OF  CORF  AT  DIFFERENT  TIMES.  DEPENDING  ON 
EXECUTION  REQUIREMENTS,  DIFFERENT  CORE  IMAGE 
MODULES  ARE  LOADED  DYNAMICALLY. 

EEATUPES  t 

-SEGMENTATION  ALLOWS  ANY  NUMBER  OF  LEVELS, 
LIMITED  ONLY  TO  A TOTAL  OF  409-1  SEGMENTS. 
-AFTER  SEGMENTS  HAVF  BEEN  GENERATED,  THEIR 
LOADING  IS  AUTOMATIC. 

-REFERENCES  BETWEEN  SEGMENTS  MAY  BE  UPWARD 
OR  DOWNWARD. 

-AT  EXECUTION  TIME,  A RESIDENT  PROGRAM  IS 
LOADED  WHICH  LOADS  THE  ROOT  SEGMENT. 
thereafter,  IT  LOADS  THE  OTHER  SEGMENTS  AS 
REQUIRED. 

OVERLAY  GENFRATION  PROVIDED  PRIMARILY  FOR  CO MP AT AB I L I T Y WITH 

PREVIOUS  LOADERS. 

ADVANTAGES  OF  OVERLAY  OVER  SEGMENTATIONt 
1 - OVERLAY  CORE  IMAGE  MODULES  CAN  BE 

HANDLED  BY  'EDITLIB*  WHEREAS  SEGMENTS 
CANNOT. 

DISADVANTAGES  OF  OVERLAY: 

1 - ONLY  3 LEVELS  OF  OVERLAY  ARE  PERMITTED. 

? - USER  MUST  INSERT  CALLS  IN  HIS  PROGRAM  TO 
LOAD  SUBSEQUENT  OVERLAYS. 

3 - RESTRUCTURING  OF  OVERLAYS  REQUIRES 

SOURCE  CODE  MODIFICATION.  (SEGMENTATION 
STRUCTURE  IS  DEFINED  OUTSIDE  THE 
program,  thus  no  source  CODE 
MODIFICATION  IS  NEEDED  TO  RESTRUCTURE 
SEGMENTS.! 

4 - EACH  OVERLAY  MUST  BEGIN  WITH  A MAIN 

PROGRAM  STATEMENT.  (SEGMENTATION  HAS 
ONLY  ONE  MAIN  PROGRAM.) 

<5  - ONLY  SELF  AND  UPWARD  REFERENCES  ARE 
ALLOWED. 

h - FNTTPF  loader  MUST  BE  IN  CORE,  WHEREAS 
SEGMTNtaTION  has  only  a small  RESIDENT. 
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»**  LOADTR  nONTPOL  CAPOG  •** 
LCAC(LFN1,LPN?,...,LFNN) 

FILE'",  WHOSE  CONTENTS  APE  TO  BE  LOADED,  APE  SPECIFIED  IN 
ONE  OF  THE  FOLLOWING  FOPMSJ 

LFN  - PEWIND  (UNLESS  INPUT)  BEFOPE  LOADING 
LFN/P  - PEWIND  BEFOPE  LOADING 
LFN/NP  - NO  REWIND  BEFORE  LOADING 

EXFCUTF.  COMPLETES  LOADING,  FILLS  UNSATISFIED  REFERENCES  BY  SYSTEM 

(AND  USER)  LIBRARY  SEARCH,  GENERATES  LDAD  MAP  AND  EXECUTES 
PROGRAM. 

EXFCLTF(PNAME,PLIST)  TO  BEGIN  EXECUTION  AT  ENTRY  POINT  PNAME 
SEE  loader,  2-B;  LOADEP/S,  2-9. 

NAME.  LOAD  AND  EXECUTE  BINARY  PROGRAM  IN  LFN  'NAME'.  EOP  A 

NAME(PLIST)  MULTIPLE  LOAD  JOB,  THE  LAST  FILE  LOADED  MAY  USE  THIS 
FORMAT  TO  INITIATE  EXECUTION  AS  WELL. 

FOR  EXAMPLEI  LOAO(INPUT) 

LGO. 

PARAMETERS  MAY  RE  SUPPLIED  TO  THE  CALLED  PROGRAM.  ETN  PL 
LINE  LIMIT  MAY  BE  RESET  (SEE  CCRM,  4-?).  FILE  NAMES 
DEFTNEO  ON  A FORTRAN  PROGRAM  CARO  MAY  BE  OVERRIDDEN  IN 
SEQUENTIAL  ORDER.  EOR  EXAMPLE!  LGO ( , ,NEWOUT) 

SUBSTITUTES  NEWOUT  FOR  THE  THIRD  EILE  NAMED. 

IF  'NAME'  IS  NOT  A BINARY  PROGRAM,  AN  OCTAL  AND  CHARACTER 
nuMP  OF  THE  FIRST  25  WORDS  WILL  APPEAR  IN  THE  DAYFILE 
ALONG  WITH  AN  ERROR  MESSAGE. 

NOGC.  completes  loading  of  a PROGRAM,  INCLUDING  GENERATI)(G  LOAD 

NOGC(LFN)  MAP,  BUT  BYPASSES  EXECUTION.  LFN  WILL  CONTAIN  THE 
LOADED  PROGRAM  AS  A SINGLE  CORE  IMAGE  MODULE 
(NON-SEGMENTED/NON-OVERLAY  LOADS  ONLY).  IF  LFN  IS 
CATALOGED  FOR  PRODUCTION  USE,  THE  ABSOLUTE  PROGRAM  WILL 
PEDUCE  TO  MINIMUM  CORE  IN  EXECUTION.  LFN  IS  SUITABLE  FOR 
INCLUSION  IN  A USER  EDITLIB. 

LIELCADCL IBNAME,EPTNAME1, EPTNAME2  ..,EPTNAMEN) 

WILL  LOAD  MODULES  FROM  SPECIFIED  LIBRARY  WHICH  CONTAIN  THE 
SPECIFIED  ENTRY  POINTS.  FOR  CORE  IMAGE  LOAD,  ONLY  ONE 
ENTRY  POINT  MAY  BE  GIVEN.  SEE  LOADER,  2-7',  LOADER/S,  2-7. 

SLOAC (LFN,NAME1,NAMF2,. ..,NAMEN) 

WILL  selectively  LOAD  MODULES  FROM  FILE  LFN.  FOR  CORE 
IMAGE  LOAD,  ONLY  ONE  ENTRY  POINT  MAY  BE  GIVEN. 

LFN  MAY  HAVE  THE  FOLLOWING  FORMS* 

LFN  - REWIND  (EXCEPT  INPUT)  BEFORE  LOAD 
LFN/P  - REWIND  before  LOAD 
LFN/NR  - NO  REWIND  BEFORE  LOAD 

SATISFY(LIRNAMF1,LIBNAME2, . ..,LTBNAMEN) 

SATISFY  SATISFY  UNSATISFIED  EXTERNALS  PRIOR  TO  NORMAL  SATISFACTION 

AT  LOAD  completion:  satisfy  EXTERNALS  FROM  USER-SPEC  IF lED 
LIBRARIES  IN  THE  ORDER  SPECIFIED.  CANNOT  BE  USED  IN 
SEGMENTED  LOADS. 
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*»♦  ld5;ft  ♦** 

L0SFT(CPTI0Nl,nPTT0N2,. .. ,PPTTONN> 

WILL  Sn  ANY  OF  SFVFPAL  OPTIONS  FOR  THE  CURRENT  LOAD  ONLY. 

PACH  OPTION  HAS  ONF  OF  THE  FOLLOWING  FORHSt 
KEY 

KFY=PAR AM 

KFY=aARAMl/PAPAH2/.../PARAMN 

SOME  OF  THP  OPTIONS  ARE » 

PILFS=LFN1/LFN?/. .. /LFNN 

PERMITS  RECORD  MANAGER  USERS  TO  ASSURE  THAT 
SYSTEM  ROUTINES  ARE  LOADED  FOR  THE 
PROCESSING  OF  SPECIFIED  FILES  (CCRM,  3-lB) 

LIR=LIBNAME1/LIBNAME2/. ../LIBNAMEN 

SPECIFIES  ONE  OR  MORE  LIBRARIES  COMPOSING 
THE  LOCAL  LIBRARY  SET.  (CONTRAST  WITH 
•LIBRARY*  CONTROL  CAPO.) 

MAP=P/LEN  SPECIFIED  LOAD  MAP  GENERATION. 

MAP=/LEN  LFN  IS  THE  FILE  TO  CONTAIN  THE  LOAD  MAP. 
MAP=P  (DEFAULT  IS  'OUTPUT') 

P IS  ONE  OR  MORE  OF  THE  FOLLOWING  LETTERS 
(DEFAULT  t SB)  « 

N - NO  MAP 

S - ERROR  MESSAGES  AND  LOADER  STATISTICS 
B - A BLOCK  LIST  AND  A LIST  OF  UNSATISFIED 
EXTERNALS 

E - A LIST  OF  ENTRY  POINTS  (WITHOUT  CROSS- 
REFERENCE  MAP) 

X - A LIST  OF  PNTRY  POINTS  (WITH  CROSS- 
REFERENCE  MAP) 

drfsFT=P  PRESET  CORE  IN  THE  SPECIFIED  MANNER. 
°PESFTA=P  (PPESETA  PUTS  EACH  LOCATION'S  ADDRESS  IN  THE 
LOW  ORDER  BITS.) 

SOME  VALUES  OF  P ARE l 

P OCTAL  PRESET  VALUE 

NONE  NO  PRESETTING 

7ERO  0000  0000  0000  0000  0000 

NGINF  4000  0000  0000  0000  0000 

ALTZEPO  ?525  ?S25  2325  2525 

(THIS  IS  ALTERNATING  0 AND  1 BITS) 
P MAY  ALSO  BE  A l-?0  DIGIT  OCTAL  CONSTANT 
with  optional  ♦or  - AND  OPTIONAL  B SUFFIX. 

FOP  additional  values,  see  loader,  2-17: 
LOADPR/S,  2-lG. 

USE-FPTNAM1/EPTMAM2 

USPP=RTMAmfi /DTNAME2 

USED  IN  OVERLAY  JOBS  TO  FORCE  LOADING  OF 
CERTAIN  RECORD  MANAGER  ROUTINES  INTO  OVERLAY 
0,0  WHEN  FRROR  NE4T40  OCCURS. 

FOR  MORE  OPTIONS,  SEE  LOADER,  2-15  THRU  2-251  LOADFR/S,  2-14  THRU  2-24. 
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»**  LOftnFR-PFlATFP  CONTROL  CfiPQS  **• 


MAPtP)  SPECIFY  OFFAULT  OPTION  FOP  LOAD  NAPS.  IT  REMAINS  IN 

pfpecT  until  cpangfd  n>  another  map  statement,  it  may  be 

OVERPTnOFN  FOP  THE  NEXT  LOAD  BY  USING  THE  MAP=  OPTION  OF 
THE  'LOSET'  STATEMENT. 

P HAS  ONE  OF  THE  FOLLOWING  y/ALUES« 

OFF  - NO  MAP  (SAME  AS  LOSFT,MAP=0) 

“APT  - STARTING  LOCATIONS  OF  PROGRAMS  AND  SUBPROGRAMS 

(SAME  AS  LOSET, MflP=SB. ) (DEFAULT  ON  OUR  SYSTEM) 
ON  - FULL  MAP  WITH  CROSS  REFERENCES  TO  ALL  ENTRY 

POINTS  (SAME  AS  LD SE T , M A P=SBX . ) . MORF  CP  TIME 
IS  USED  TO  GENERATE  A EULL  RATHER  THAN  PARTIAL 
MAP. 

•MAP'  MAY  OCCUR  WITHIN  A LOAD  SEQUENCE. 


LI PRAPY (L  TONAMEI, LIBNAMF2, ... .LIBNAMEN) 

LIPRARY.  SPECIFY  A SET  OF  GLOBAL  LIBRARIES  TO  BE  SEARCHED  ECR 

EXTCRNALS  and  programs  and  the  order  IN  WHICH  THE 
LIBRARIES  ARE  TO  BF  CONSIDERED.  THIS  SET  REMAINS  IN 
EFFECT  UNTTL  FND-OF-JOP  OR  UNTIL  ANOTHER  'LIBRARY* 
STATEMENT  IS  ENCOUNTERED. 

THP  ORDER  OF  SPAPCH  FOP  EXTERNALS  IS  1 

GLOBAL  LIBRARIES  (THOSE  ON  LAST  'LIBRARY'  STATEMENT) 
LOCAL  LIBRARIES  (THOSE  IN  LIB=  PARAMETER  OF  'LDSET') 
SYSTEM  library  ('NUCLEUS') 

THE  ORDER  OF  SFAPCH  FOP  PROGRAMS  IS» 

LOCAL  files 
global  LIBPAPIES 
LOCAL  LIBPAPIFS 
SYSTEM  library 

THE  MAXIMUM  number  OE  USER  LIBRARIES  WHICH  MAY  BE 
SPPCIFIEO  ON  A 'LIBRARY'  STATEMENT  IS  ?.  THE  FOLLOWING 
LIMITS  ON  THE  NUMBER  OF  LIPRARIES  SPECIFIED  APPLY! 

USSR  SYSTEM 

0 7A 

1 13 

? ? 

'LIBRARY.'  NULLIFIES  THF  EFFECT  OF  THE  PREVIOUS  'LIBRARY' 
STATPMrNT.  'LIBRARY'  MAY  NOT  OCCUR  WITHIN  A LOAD 
SPOUPNCP . 
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PErGCP.  TUPNS  PEOUCE  FLAG  ON.  IT  PFMAINS  ON  UNTIL  END  OF  JOB  OR 

UNTIL  AN  'RFL*  CARO  IS  FNCOUNTFPEO.  THE  LOADER  USES  AS 
MUCH  EL  AS  NEFOEn  FOR  THE  LOAD  (UP  TO  JOB  CARO  CM),  THFN 
JUST  RFFORP  PROGRAM  PEFCUTION,  REDUCES  FL  TO  MINIMUM 
needed  to  CONTAIN  THE  LOADED  MODULES. 

TYPE  LOAD  MINIMUM  EL 


BASIC  HIGHEST  ADDRESS  OF  ALL  PROGRAMS  AND  BLOCKS 

(INCLUDING  BLANK  COMMON) 

OVERLAY  HIGHEST  ADDRESS  OF  ALL  OVERLAYS 

SEGMENTED  FOR  A PROGRAM  WITH  BLANK  COMMON: 

BLANK  COMMON  FOLLOWS  THE  HIGHEST  SEGMENT. 
MINIMUM  FL  IS  THE  END  OF  BLANK  COMMON. 

FOP  A PROGRAM  WITHOUT  BLANK  COMMON  BUT  WITH 
MULTIPLE  levels: 

MINIMUM  FL  IS  END  OF  HIGHEST  SEGMENT  IN 
HIGHEST  LEVEL. 

FOR  A PROGRAM  WITHOUT  BLANK  COMMON  AND  ONLY 
ONE  level: 

minimum  FL  IS  END  OF  ROOT  SEGMENT.  FL  IS 
ADJUSTED  DYNAMICALLY  AS  SEGMENTS  ARE  LOADED 
AND  UNLOADED. 

IN  ALL  CASES,  FL  IS  ROUNDED  UP  TO  A MULTIPLE  OF  100  OCTAL 
WORDS.  'REDUCE'  MAY  OCCUR  WITHIN  A LOAD  SEQUENCE. 


RFL,YXXXXX.  DFOUEST  A NEW  OCTAL  FIELD  LENGTH  DURING  THE  JOB  EXECUTION 
(UP  TO  JOB  CARD  CM).  'REL  ' TURNS  OFF  THE  REDUCE  FLAG 
FOR  THE  NEXT  LOADING  SEQUENCE.  THEREFORE,  A 'REDUCE'  CARD 
MUST  BF  USED  AFTER  THE  'RFL  ' TO  TURN  THE  FLAG  BACK  ON,  IF 
DFCTPED. 

'RFL'  SETS  THE  MAXIMUM  Ft  A PROGRAM  MAY  USE  UNTIL  ANOTHER 
'RFL'  IS  FNCOUNTERFO. 

fxamrlf  : 

RFOUCE.  **  TURN  ON  REDUCE  FLAG 

LG01.  *»  LOAD,  REDUCF  FL  TO  MINIMUM,  EXECUTE 

RFL,G0000.  INCpfasE  FL  FOR  NEXT  LOAD,  TURN  REDUCE 

FLAG  OFF  FOR  NFXT  LOAD 
LGOF.  **  load  and  retain  6QOOOB  CM 

ATTACH, LG03, I D= XXXV. 

LGO».  »»  LOAD  TN  UR  TO  GOOOO  (LAST  RFL), 

EXFruTF 

RFL,  700  00.  increase  FL  FOR  NEXT  LOAD,  TURN  REDUCE 

FLAG  OFF  FOP  NFXT  LOAD 
RFDUCF.  **  TURN  REDUCE  FLAG  BACK  ON 

LGOL.  •*  LOao  TN  U”  TO  70000  (LAST  RFL), 

PEOiiCF  FL,  FyrQuTE 


*RFL'  hay  not  flPOFflo  WITHIN  A LOAO  SEQUENCE 
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SFGMPNTfiTION  »•* 

TO  T‘^Pt'^PPNT  OFOurNTATIPN  a SPPAPATF  DIPECTIVE  RECOPD  IS  PRFPAPFO 
TO  PFSrPlpr  thp  tpFp  STPuPTUpF.  T9P  MODULES  WILL  9E  LOADED 
AUTOMAT  TPALLY  AS  UF'^OPn.  Jpn  rirtT  LENGTH  IS  ADJUSTED  DYNAMICALLY 
Tr  PPOr.PAM  HAS  NO  PLANK  COMMON,  NO  LEVEL  CAPOS  AND  NOT  IN  PEL  MCOF. 

ALL  NECPSSAPY  PrnnPD  MANAGEP  ROUTINES  MUST  BE  IN  PQOT  SEGMENT. 

SEGLrAr,T3LrND:P,B=LENABS. 

TMTTTATE  A SPGMENTATION  JOB  AND  READ  THE  DIRECTIVE  RECORD. 
T^L’^NDId  - niPECTIVPS  ARE  ON  FILE  LFNDIP 
(DEEAULTt  I=TNPUT) 

D = LFNAB'^  - BINARY  APSOLUTE  MODULE  WILL  BE  ON  FILE 
LENAPG  (DEFAULT:  B=A3S) 

OThpp  load  and  LPSTT  CAPDS  follow  THIS  CARD. 


SFGLOAO  DTPECTIVES 

Y TPrr  Y TO  DEFINE  a TPPE  STPUCTUPE. 

Y MAY  RP  roMHA  pEPARATPD  LIST  OF  OTHER  TREES  t PR E -0 EE  I N ED ) , 
SEGMPNTS  BP  NAMFS  OF  INDIVIDUAL  SUBPROGRAMS  TO  BE  ASSIGNED 
A COMMON  starting  ADOPESS. 

y tpfc  F-(C,P>  TB  TNCICATE  BRANCHING  0^  THE  TREE  USE  THEN  ALL 
FOLLOWING  TTE“S  APE  ENCLOSED  IN  PARENTHESES. 

B TECLUO':  A,B  TO  ASSIGN  PROGRAMS  A AND  B TO  SEGMENT  C. 

COPTFS  or  a routine  may  3E  IN  DIFFERENT  SEGMENTS. 

C CIOPAL  CBM1,bo“R  to  establish  named  commons  at  desired  SEGMENT. 

PEFEPruoE  NAME  To  LEFT  OF  DIRECTIVE  MUST  BE  DEFINED  BY  A 
oorvlOUS  DTPECTIVT  IF  SEGMENT. 

r ''lopal  C0“1  ,SOMB-cavF  TO  SAVE  GLOBAL  BLOCK  ON  DISK  FOR  LATER  CALLS 

TB  the  segment  which  contains  it. 

rKO  roT  cmouLB  OF  THE  LAST  DIPFCTIVE  IN  THE  RECORD,  WHERE  EPT  IS 
THE  FNTPY  of  THF  MftlN  PROGRAM  IN  THE  ROOT  SEGMENT. 

NBNFATAl.  ERROR  IF  OMITTED. 
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SAMPLE  TREE  DIAGRAM 

A PLOCK  DATA  SUBPROGRAM  OFEINES  COMMON  /COMl/  WHICH  IS  TO  BE  LOADED 
WITH  PROGRAM  S?.  /COHl/  IS  ALSO  REFERRED  TO  BY  S6  AND  S7. 

MYMAIN 

L 

/ / / / 

/COMl/  S3  S<« 

S?  S12 

Z 

/ / 

Sf>  S7  (SG  AND  S7  USE  /COMl/l 

SEC  INCLUDE  S?,BLKDAT. 

SEE.  GLOBAL  COMl 
PLUM  TREE  SEG-(S6,S7) 

PEAR  TREE  MYM  AIN- < S 1 , PLUM,  S 3,  S<*  , SS ) 

SS  IK'CLUDE  S9,F10,S11 

S4  INCLUDF  SI? 

FND 

BY  USING  NESTED  PARENTHESES  ONE  TREE  CARO  MAY  BE  ELIMINATED. 


***  SEGMENTATION  CAUTIONS 

TO  DEVELOP  A SEGMENTED  JOB,  SEVERAL  RUNS  MAY  BE  REQUIRED,  SO 
RELTCATABLE  OBJECT  CODE  SHOULD  BE  CATALOGED.  COMMON  BLOCKS  AND  RECORD 
MANAGFR  ROUTINES  MAY  NEPD  TO  BE  INCLUDED  IN  LOWER  SEGMENTS  TO  OPERATE 
PROPERLY . 

THE  lCAD  map  MUST  BE  CHECKED  CAREFULLY  FOR  ANY  DUPLICATE  COMMON 
block  entries,  each  COMMON  BLOCK  WHICH  IS  REFERENCED  IN  MORE  THAN  ONE 
SECMENT  MUST  BE  °UT  INTO  A GLOBAL  AT  THE  NE ARES T- TO - T HE-ROOT  SEGMENT. 

TE  ANY  common  BLOCK  APPEARS  MCRE  THAN  ONCE  WITHOUT  •*SAFE“,  A GLOBAL  IS 
REOUIRED  to  eliminate  DUPLICATE  STORAGE  AREAS.  IE  INPUT/OUTPUT  IS 
PEPECRMED  IN  SEVERAL  SEGMENTS,  SOME  RECORD  MANAGER  COMMON  BLOCKS  MAY 
BE  MULTIPLY  D'^EINEO  (E.G.,  AOB.PM  OP  Q«.IO.). 

THE  GLOBAL  CARD  EOP  ROUTINES  WITH  IMBEDDED  SPECIAL  CHARACTERS  IN 
THE  NAME  MUST  USE  ♦ SIGN  <E.G.,  MYMAIN  GLOBAL  S A 0 B.  RM? , SOB . 1 0 . T) . 

WHEN  RECORD  MANAGER  COMMON  IS  GLOBAL  TO  A ROOT  SEGMENT,  THE  LOAPER 

MAY  Detect  errors  in  initializing,  if  so,  an  include  card  will  be 

RECUIRED  TO  MOVE  THE  RM  ROUTINES  TO  THAT  SEGMENT  (E.G., 

MYMAIN  INCLUDE  ♦INCOMES  ). 

rONTINUEO  DIRECTIVES  MUST  GO  AL I THE  WAY  THROUGH  COLUMN  7?,  EVEN  IE 
A WORD  TS  SPLIT.  THE  NEXT  CARD  HAS  A COMMA  (,)  IN  COLUMN  1 AS  THE 
continuation  SIGNAL,  THEN  THE  DIRECTIVE  IS  COMPLETED  STARTING  IN 
C01 UMN  ?. 


/ 

SS 

S9 

ElO 

Sll 
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***  EPRnP  MFSSAGFS 

IF  THFPF  APF  FPPOPS  OF  ANY  TYPF,  MFGSAGFS  APPFAP  IN  TH?  DAVMU 
(LISTFP  AT  THF  FNO  OF  EACH  JOR).  SOMF  SPECIFIC  FPPOP  HPSSACfS  APPFAP 
AS  PFSCPIRFO  RFLOW.  SOME  OTHER  ERRORS  ARE  niSCUSSFO  ON  PAGE  14-1. 

COMPILER  ERRORS  ARE  PRINTED  WITH  THF  LISTING  OF  THF  SOURCE  CODf . 
FOP  FORTRAN,  SEE  CCRM,  CHAP  4,  AND  FTN,  CHAP  III-?.  f OP  COOOL,  SEE 
CPPH,  CHAP  S,  ANO  COROL,  APPENDIX  G. 

CRJFCT  TIME  ERRORS  SUCH  AS  PAD  DATA  FORMAT  ARE  NOTFf!  AT  THF  END 
OF  THE  OUTPUT  ANO  “FATAL  ERROR  NN“  APPEARS  IN  THE  DAYFILE. 


LOADER  AND  NOS/BE  ERRORS 

DIAGNOSTIC  MESSAGES  ARE  PUT  IN  THE  DAYFILE  PY  THF  NOS/BL  OPERATING 
SYSTEM  whenever  IT  DETECTS  ERRORS.  FOR  EXAMPLE,  ERRORS  FOUND  BY  THF 
LOADER  ARE  IDENTIFIED  BY  "FATAL  LOADER  ERROR  FOLLOWED  BY  ADDITIONAL 
explanatory  diagnostics.  see  LOADER,  APPENDIX  Cl  L OA DE R /S , A PPE NO  I X C. 


MODE  ERRORS 


MODE  PRRORS  ARE  DETECTED  PY  THE  CENTRAL  PROCESSOR  AND  MAY  RESULT 
FROM  ANY  TYPE  OF  PROGRAM. 


ERROR  MODE  1 


2 

4 

3, 

0 


ADDRESS  OUT  OF  RANGE  (USUALLY  SUDSCRTPT  ERROR  OP 
A reference  to  a SUBROUTINE  OR  FUNCTION  NOT 
LOADEDT.  IE  THE  ADDRESS  = 4XXXXX  THEN  THERE  IS  A 
MISSING  S'JPPOUTTNF  OR  FUNCTION.  (XXXXX  IS  THE 
ADDRESS  OF  the  REFERENCE  TO  THE  ROUTINE. I 
OPERAND  CUT  OF  PANGF  - INFINITE  OPERAND 
INDEFINITE  OPEPAND  (E.G.,  7ERO  OIVIOFD  BY  ?EPO 
OR  UNINITIALT7EO  CORE) 

B,  6,  7 APE  COMBINATIONS  OF  MOOES  1,  2,  4 
INDICATES  ATTEMPT  TO  EXECUTE  ILLEGAL  INSTRUCTION 
(PPOBABLY  DATA  HAS  OVERWRITTFN  PART  OF  CODE.) 


CFRTATN  system  EOPORS  RELATED  TO  FILE  MANIPULATIONS  (E.G.  INPUT 
ANT  CUTPUT)  GENERATE  PFCOPO  MANAGEP  DAYFRE  MESSAGES 
• RM  ERROR  NNN  ON  LFN  XXXXXXX  •. 

SEE  PM,  CHAPTER  G. 


ALL  FATAL  ERRORS  WILL  CAUSE  A SHORT  DIAGNOSTIC  OUMP  (DMPX)  TO 
PE  PRINTED  AT  THF  fnO  OF  THF  USFPS  OUTPUT  (CCRM,  NOSPF  , B-i: 
SCOPE,  9-l». 


TAPF  parity  errors 

WHEN  TAPF  papTTY  ERRORS  ARE  RFCOVEPED  BY  THE  SYSTTM,  THL  MFSSA&E 
CONTAINS  “PVO“.  UNRECnVFREO  ERRORS  PRINT  "ERR"  AND  USUARY  ABORT  JOO. 
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files  "Nn  IftPFS 


»•*  INTRfinUCTjnN  »»* 

THF  FOOD  SYSTFH  TS  A F I L F-OR T FN T FO  SYSTEH.  A FILE  MAY  BE  ACTUALLY 
A VPGNFTIC  tape,  A niSK  APFA,  A DISK  PACK,  OP  ANY  OTHER  SUCH  DEVICE. 

FVEpy  SEOUENTIAL  FILF  IS  EPfATFD  AS  THOUGH  IT  WERF  ASSTGNFO  TO  A 
MACNFTTC  TAOF.  PANDOM  ACCESS  FILES  MUST  BE  ON  MASS  STORAGE  DEVICES. 

ASSIGNMENT  OF  FILES  TO  ACTUAt  DEVICES  IS  ACCOMPLISHED  OUTSIDE  THE 
PPCGPAM  hITH  rONTPOL  fAPDS.  A FILE  NEED  NOT  SF  ASSIGNED  TO  THE  SAMF 
DEVIFF  OR  EVEN  TO  THE  SAMF  TYPE  OF  DEVICE  ON  DIFFERENT  RUNS  OF  THE 
SAME  PROGRAM.  IF  A FILE  TS  NOT  ASSTGNFO  TO  A PARTICULAR  DEVICE  WITH 
CONTROL  CARDS,  IT  IS  AUTOMATICALLY  ASSIGNED  TO  A DISK  AREA.  IT  IS 
RFCCMMFNDFD  that  fop  PURFLY  SCRATCH  FILFS,  DISK  FILES  BE  USED.  PLEASE 
PLACE  frequently  USED  FILES  ON  DISK. 

INFCPMATTCN  FROM  AN  UNBLOCKED  STRANGER  TAPE  TO  PE  STORED  ON  A 
permanent  FILF  OR  USFD  AS  INPUT  TO  A COMPILER,  MUST  PE  COPIED  TO  A 
S'-STEM  standard  (SI)  FILE.  CARD  AND  PRINT  LINE  IMAGES  AS  HELL  AS 
BLOCKED  STRANGER  Yftprs  MAY  PF  CCNVERTFD  USING  'COPYRM*  (CCRM,  6-6)  OR 
CATALOGUED  POOCEDURF  'COPYBLK  ' (CCLIB/P)  WHICH  UTILIZES  FORM. 


»♦»  RECORD  MaNAGER 


RECORD  ‘MNAGFP  (RM)  IS  A UNIFIED  INPUT/OUTPUT  PACKAGE  USED  BY  MAJOR 
PPCDUCT  SETS.  COBOL  AND  Cn«RASS  MAY  DEFINE  MANY  FILE  TYPES  WITHIN  THE 
LANGL'ACF.  FTN  UTIl  I7ES  SUCH  FILES  BY  MEANS  OF  FILF  DEFINITION  CARDS. 

CM  SUPPORTS  FtVF  (S)  TYPTS  OF  FILF  ORG A N I Z A 1 1 OMS t SEQUENTIAL  (SO), 
TNCEYEP  SEQUENTIAL  (IS),  WORQ  ADDPFSSABLE  (WA),  DIRECT  ADDRESS  (DA), 

AND  actual  key  (AK).  (DFF  Rmctn,  RMCDB,  RMUG) 

ALL  PM  pCUTINES  SHPiitr)  rr  ft  inf  O.  0 OVERLA  Y OF  OVERLAY  JOBS. 


FILE  OPGAUr^rP  anq  RFCORQ  MANAGfR  •*» 
(F  0PM) 


Tvr  form  UTIlTIY  CM4  MAN'PULITr  OFCOODS  AND  RFORGANIZF  FILES  IN  MANY 
WAYS.  RECORDS  MAY  RE  ptBLOCKFO  rcxj.i  sr?AN'GFP  FILES.  TEST  DATA  MAY  BE 
GFNF°ATcn  BY  SELFr.Tfvjr.  pirr.ORDF  ronn  A LARGER  INPUT  :ILE.  FORM  REPLACES 
TUT  SPOPF  3.3  TNDFyro  SEQUr''TlAL  UTIlTTUS  FOR  riLF  MAINTfnANCF.  ALL 
INPUT/CUTPUT  is  HAMUFD  pv  pr.'ipr.  MA^iAGF'^.  USFP  MJ''T  SUPPLY  PROPER 
FILE  CAPOS  AND  niPrcTiYcs,  ('-rr  rop*-  pitrF'NCF  '’anual) 
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r **»  rMAPAr'T»'RTSTinS  OF  MAGS  '^TOPAGF  DEVICES 

I'  TWO  TV^ES  OF  nn-LINE  ROTATING  MASS  STO‘?AGF  ARE  AVAILABLE  ON 

[■  CERTAIN  OF  THF  DTNSRDC  CDC  GOOO  COhpUTERS:  AND  6G3H  DISKS.  EACH 

\ PF^-OVAPLE  DISK  RACK  HOLDS  OVER  IIS  MILLION  CHARACTERS.  ON  844 

I DRIVES  POSITIONING  MAY  TAKE  PLACE  ON  ONE  DRIVE  WHILE  READING  OR  WRITING 

I AMCTHFP  (SFEK  OVERLAP).  SOME  OF  THE  DEVICES  ARE  ASSIGNED  FOP  PERMANENT 

I FTLF  STORAGE.  SOMF  OF  THE  REPLACEARLE  PACKS  ARE  AVAILABLE  AS  USER 

? DEVICE  SETS  (UP  TO  IIP  MILLION  CHARACTERS  PEP  JOB).  THE  NOS/BE 

;•  OPERATING  system,  QUEUES  AND  SCRATCH  FILES  RESIDE  ON  844  PACKS.  THESE 

^ PACKS  HAVE  SINGLE  ERROR  RFCOVFRY  AND  APE  VERY  RFLIADLE. 

i IT  IS  the  users  responsibility  to  define  the  file  STRUCTURE 

r DFSIRFP.  THF  OPERATING  SYSTEM  ALLOCATES  SPACE  AS  NEEDED  IN  UNITS  OF 

RFCCRO  BLOCKS  (RB).  DATA  IS  WRITTEN  INTO  PHYSICAL  RECORD  UNITS  (PRU) 
WHEN  A FILE  IS  GENERATED,  UNTIL  ALL  THE  PRU'S  IN  THE  RB  ARE  FILLED, 
then  ANCTHFR  pb  TS  allocated.  ALTHOUGH  PE  STORAGE  CHARGES  ARE  FOR 
PRU'S,  any  NUMRF9  OF  PRU'S  UP  TO  5G  USES  UP  A WHOLE  RB  OF  THE  AVAILABLE 
SYSTEM  SPACF.  since  MORE  T IMF  js  SPENT  IN  POSITIONING  THAN  TRANSMITTING 
data,  a MpmdRY  request  stack  CONTAINS  ALL  OUTSTANDING  MASS  STORAGE  FILE 
ACTICN  REQUESTS  AND  THE  LEAST  POSITIONING  OPERATION  IS  PERFORMED  FIRST. 
EACH  844  DISK  CONTAINS  ’^232  RB'S  WITH  B6  PRU'S  PER  RB. 

FORTRAN  AND  COBOL  PROCESS  ALL  RFAD/WRITE  OPERATIONS  THROUGH  BUFFERS. 
THE  PROGRAMS  MANIPULATE  USER  DEFINED  RECORDS  SUCH  AS  CODED  UNIT  RECORDS 
OR  LCGTCAL  BINARY  RFCORDS.  THE  NOS/BE  SYSTEM  MANIPULATES  DISK  PRU'S  OF 
G4  WORDS.  TRAILING  BLANKS  ARE  STRIPPED  FROM  COPED  RECORDS  AND  A LINE 
terminator  (1?  BITS  OF  BINARY  7FRO)  IS  ADDED  BEFORE  A RECORD  IS  PLACED 
IN  A buffer  for  UNIT  RFCORD  DEVICES. 

• SEVERAL  RANDOM  ACCESS  TECHNIQUES  APE  AVAILABLE  FOR  DATA  FILES  WHICH 

ARE  NOT  SFQUENTIAL  IN  NATURE.  NOTE  THAT  ACCESSING  MANY  SMALL  PIECES  OF 
DATA  IS  TIME  CONSUMING  AND  IT  MAY  BE  BETTER  TO  READ  SEQUENTIALLY,  SINCE 
BOTH  COBOL  AND  FORTRAN  BUFFER  I/O.  JOB  THROUGHPUT  MAY  BE  DECREASED  BY 
POOR  CHCTCF  OF  RECORD  AND  BLOCK  STRUCTURE. 


I 

f 

t 
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»»*  pr»Mfl'4''NT  FILES  »*• 

FFP^iaNFNT  files  A^F  OAIA  no  PF>n&F>AM  files  PF=>MANF*4ILY  STOPtD  ON  J 
SFLFriFD  DISK  O^VTCFS  AND  ACCESSFO  PV  THF  NOS/PF  COMMANDS  GIVEN  PELPH.  j 
IT  IS  THE  noiGINAino'S  »E  SP  ON '' I P I L I I Y 10  PIJPGE  A FHE  v^hEN  IT  IS  NO  |j 
LOKCEP  NEFDEn.  l| 

fl 

ThFPF  APP  TWO  (?)  SEPAPATE  SETS  OF  opPMAMENT  FILES)  ONE  IS  SHAPED  PY  L 
THF  f/no  AND  BGOO;  thp  OTHFP  is  on  the  r 

; 

ONLY  IJMCLASSIEIPO  PPOGPAMS  (SOUPCE  OP  OBJECT)  AND  DATA  may  BE  I 
CATALOGFO  INTO  ofPMANPNT  ETLFS.  NF  W FILES  WILL  BE  OlJMPfO  TO  BACKUP  j 
TAPE  DAILY  AND  HELD  ONE  WEEK.  THP  TOTAL  PPPMANENT  IILE  BASE  IS  DUMPED  | 
ONCE  A WFFK  AND  PETATNED  ABOUT  3 WEEKS.  { 

rCOASrONALLY  SOME  permanent  FILES  BECOME  UNPEAOABLE  AND  NOT  ALL  ! 
FILES  MAY  BF  PECOVFPAPLE.  THE  USFR  SHOULD  HAVE  RPOVISION  EO®  1 
PEOPEATING  the  ETLFS  IE  THIS  SITUATION  OCCUPS.  (SEE  CCLTB/Pt  ^ 
FELCUMP/SELLOAD)  P 

PERMANENT  file  CONTROL  CAPDF  WAY  RE  CONTINUED  TO  A SECOND  CARO  I 
RY  FILLING  THE  FIPST  CARR  THROUGH  COLUMN  HC  (OR  STOPPING  AFTER  A ? 
COMMA)  AND  STARTINF,  THF  SFCr'ND  CARO  IN  COLUMN  1.  i. 


♦*»  AUTPMCTIC  permanent  file  PURGE  *** 

prPMANFNT  FILES  MAY  RF  PUPGEO  RY  tht  COMPUTER  CENTER  fop  ONF  OE  THE 
FOLLCWING  pfaSONS) 

1)  INVALID  JOR  ORDFP  NUMRER  FOR  AC 
no  CANCFllfd  JOR  ORRFp  kjyf<riEP 
p)  invalid  IP  (F.G.,  NOT  USER  INITIALS) 

3)  NOT  accessed  WTTHTN  THF  LAST  33  RAYS  (G70Q/6E0D) 
o IS  PAYS  (HADO) 

THr  NON-ACCESSFO  FILFS  WHICH  Apf  PURGED  WILL  RF  KEPT  ON  TARE  FOR  AT 
LEflFT  CNF  (I)  m-|».th.  ANYONF  WIfmtnG  TQ  RECOVER  SUCH  A PURGFD  FILE 

SHOULD  CALL  the  permanent  EILF  LTRRARTAN,  CODF  130?. 1,  (?C?)  ??7-lR07. 

A ATminAL  pFE  WILL  RF  charged  FOR  this  SFRVICE. 

NOTf  that  an  i|N-cr'>rn  FILF  FunuLD  BF  OURGED  BY  THE  USfp  RATpER  THAN 
WATTtnc  OVFp  33  DAY"  FTP  TMF  automatic  FIJOCE,  SINCE  THERE  IS  A CHARGE 
Eop  FFSMANruT  FILE  ST-wa',f  AS  LON'-  Af  the  ttlc  cyistS  AS  a PERMANENT 
FTLF  IN  THF  F yoTFM, 

thf  cypt3(ittdti  'atf  is  ‘;ft  Presently  i.isfr  for  ftlf  purging. 

HOWrycc,  ’•HF  USER  “‘t  f t h t " PAR'iMFTER  AS  A REMINDER  0^  THE  IMENDcO 
lift  ryprrTANCY  OF  1 'rLF.  t ,.r  offaULT  fypiosij^.^  "ATF  T3  T.dSTY  lEQ) 
DAYF  AFTFO  CRFA.tton.  tneTS.TF  F^IFNITON  TS  RESFRVFf  f QR  SYCTEm  fue''. 


A file  rr-  LIMTIPn  rr  >'rj  mope  TEON  S T f ” 'RJ'S  ON  T-jr  f,  7 D 0 / 1..' , 
7prn  ROUS'S  ON  the  H4F'',  f/CepT  RY  SPFCIAL  ^RTTTfn  pE-'MISSTON  nr 


TO  THF  LFN  CN  ft  I^DUTE  C»=?0.  IF  0*11TItU  ON  I Ht  FlNbl/ 
CNLY  oflUTE  Cfl‘=’n  FOR  ftN  LFN,  THF  DEFAULTS  ftRE  FID,  FCt  TID, 
PFSPFOTTVFLY. 
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USER  AUDIT  ♦»* 

IN  OPDFR  TO  DFTFRNINE  WHAT  FILES  A USER  HAS  ON  THE  PERMANENT  FILE 
STORAGF,  ROTH  STATIO  AND  DYNAMIC  AUDIT  PROGRAMS  APE  PROVIDED.  THE 
OUTPUT  LIST  OF  THE  DYNAMIC  AUDIT  IS  OF  THE  PERMANENT  EILES  EXISTING 
AT  THE  «0“FNT  THE  AUDIT  PROGRAM  IS  RUN.  THE  STATIC  AUDIT  LISTS  THE 
FILFS  as  they  existed  tUSUALLY)  AT  THE  END  OE  THE  PREVIOUS  DAY.  (SEE 
CCRM,  T-l?,  FOR  USER  DEVICE  SET  AUDIT.) 

'STATIC  AUDIT 

OEGIN, AUDIT, TYPE  = STATIC, <P AR A ME  TER S > . 

DYNAMIC  AUDIT 

AUDIT, <PARAMFTFRS>.  (UNSORTED) 

RE  GIN, AUDIT, <PARAMETERS>.  (SORTED) 

AUDIT  PARAMETERS 

ALL  AUDIT  PARAMETERS  ARE  OPTIONAL  AND  ARE  KEYWORDS.  ONLY  THE  LAST 
TWO  ETGITS  OF  THE  ACCOUNT  NUMBER  WILL  APPEAR  ON  AN  AUDIT. 

I.F=  SPPCIFY  THE  FILE  ON  WHICH  THE  AUDIT  INEORMATION  IS  TO  BE  WRITTEN. 
(OFFAULTJ  LF=0UTPUT) 

AT-  TYPP  OF  AUDIT  DESIRED 

AI=F  — FULL  AUDIT  (?  LINES  PER  FILE) 

(PRUS,  ID,  CY,  FULL  PEN,  AC  SEGMENT,  CREATION  DATE, 
DATF/TIME  LAST  ATTACHED,  OATE/TIME  LAST  ALTEpEO,  « USES, 

* RBS,  # ALTERS/REWRITES,  # EXTENDS,  EXPIRATION  DATE, 

DISK  VSN) 

AI=I  — INTERCOM  AUDIT  (1  72-COLUMN  LINE  PER  FILE) 

(ID,  PRUS,  CY,  ?q-CHARACTERS  OF  PEN,  AC  SEGMENT,  CREATION 
DATE,  OATP  LAST  ATTACHED,  n USES) 

(DEFAULT  FOR  INTERCOM  STATIC  AND  UNSORTED  DYNAMIC) 

8XrP  — PARTIAL  AUDIT  (1  LINE  PEP  FILE) 

(PRUS,  ID,  CY,  FULL  PEN,  AC  SEGMENT,  CREATION  DATE,  DATE 
last  attached,  date  last  altered,  # USES) 

(DEFAULT  FOP  OTHER  AUDITS) 

AI=S  — SHORT  AUDIT  (ID,  PRUS,  CY,  FULL  PEN) 


ACCOUNT  number  TO  BE  AUDITED 

(ONLY  THE  segment  (last  2 DIGITS)  ARE  LISTED) 


ftC=JJJJJJJJJJ  — 


AC^JJJJJJJJOO  — 


AUDIT  BY  ACCOUNT  NUMBER  ON  CHARGE  CARD  (BATCH) 
OR  LOGIN  (INTERCOM)  (NOT  FOR  BEG  I N, A UDI T , . . . . ) 
AUDIT  FILES  BY  10-DIGIT  ACCOUNT  NUMBER 
(MUST  HATCH  CHARGE  CAPO  OR  LOGIN) 

AUDIT  BY  FIRST  8 DIGITS  OF  ACCOUNT  NUMBER 
(MUST  MATCH  CHARGE  CARO  OR  LOGIN) 


TD=  AUDIT  FILFS  BY  USER  ID  XXXX  (DEFAULT!  FROM  CHARGE  CARD/LOGIN) 
IF  pcTH  to  and  AC  APE  SPECIFIED,  THAT  SUBSET  WILL  BF  LISTED. 

WHFN  NO  PARAMETERS  ARF  SPECIFIEO  (AUDIT.),  THE  DEFAULTS  USED  ARE 


LE-CU TPUT, AI=I, ID^XXXX  TNTFRCOM  STATIC  AND  UNSORTED  DYNAMIC  AUDITS 
ErrOUTPUT,AT=P,TD=XXXX  ALL  OTHER  AUDITS 
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pppMflNFNT  FILF  commands  *♦* 

9FQUFST,LFN, *PF. 

MUST  PPPC>^nF  THF  INITIAL  WRITING  OF  FILF  LFN. 

CA  TALOr,,LFN,PPN,  in  = XXVX,  AC  = JJJJJJJJJJ,  < P AR  A MF  TE  »S  > . 
catalcc,lfn,t  n-xxxx , AC= JJJJJJ JJJJ ,<PARAMETFPS>. 

FNTFP  THP  file  in  PEPMANFNT  FILE  DIRECTORY  AFTER  WRITING 

attach,lfn,pfn,io=xxxx,<paramfters>. 

ATTArH,PFN,TO=XXXX,<PAPAMETER'^>. 

TO  USE  A PREVIOUSLY  CATALOGED  FILE. 

PUPGE,LFN,PFN,in=XXXX,<DARAHFTEPS>. 

pupcr,pfn,io=xxxx,<parameteps>. 

IF  PILE  TO  RE  PURGED  HAS  BEEN  ATTACHED  WITH  CONTROL 
pepmisSION  previously  in  the  job,  ONLY  LFN  IS  REQUIRED. 

REN  A ME, eFN,pFN,<PARA ME tERS>. 

CHANGES  NAME  OR  ALTERS  PASSWORDS,  CYCLE,  ID,  OR  AC. 
HOWEVER,  file  must  BE  ATTACHED  WITH  ALL  PERMISSIONS  BEFORE 
rename.  CANNOT  CHANGE  PEN,  IC  OR  PW  FOP  ONE  CYCLP 
OF  A MULTI-CYCLE  FILE.  CANNOT  RENAME  IF  MR=1. 

EXTE^n,LEN. 

ADD  PFRMANFNT  DATA  TO  EC''-  OF  ATTACHED  PEPMANFNT  FILE. 

alter, LFN. 

CHANGE  length  CE  ATTACHED  PERMANENT  FILE. 


PEOUIRED  PARAMETERS 

LFN  LOGICAL  FILE  NAME,  1 TO  7 CHARACTERS,  FIRST  MUST  RE  ALPHABETIC. 

PFN  PERMANENT  FILE  NAME  Fop  SYSTFM  CATALOG,  UP  TO  40  CHARACTERS. 

IF  LPN  IS  MOT  SPECIFIED,  FIRST  7 CHApACTFRS  OE  PEN  APE  LFN. 

IF  PEN  NOT  SPECTEIED,  LEN  IS  ALSO  PEN. 

IC=XXXX  REGISTERED  INITIALS  OF  FILE  OWNER  (AS  ON  CHARGE  CARD). 

REOUIRED  ON  catalog,  ATTACH,  AND  PURGE  (LONG  FORM). 


SEF  NEXT  PAGE  FOR  OPTIONAL  PARAMETERS 
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PflPAMFTPPS  (UGUfllLY  OPTIONAL) 

ALL  OPTIONAL  PPPHANFNT  FTLF  PAPAMFTFPO  APF  KFYWOPOS.  A KEYWQPO  10 
ppLLrMPD  PY  THFN  THF  V AL  UP  WITH  fiO  OLANYS. 

AO = J J JJJJ JJJ J JOB  NUMBFP  TO  CHAPQF  STORAGE  OF  FILE.  WH^N  OMITTED 

OP  TNVALTO  FOPMAT  (E.G.,  TOO  FEW  CHAOACTERS),  AC  IS 
TAYPN  FPOM  CHAPGF  CAPD  op  LOGIN. 


CY  = 


LC=  1 


MP  = 1 


PP- 

TK  = 
PD  = 
YP  r 

FX- 
MD  = 
CN  = 


CYCLE  MtjMPFP  1 TO  BOO  (INITIAL  CPFATE  DEFAULT  IS  1) 

ONLY  FIVE  (S»  CYCLES  MAY  EXIST  AT  ANY  ONE  TIME. 

NOTF  THAN  THF  HIGHEST  NUMBFPFD  CYCLE  WILL  BE  ATTACHEO  OR 
PUPGFD  IF  rv  ANO  LC  APF  NOT  SPFCIFIFO. 

AFCFSS  THF  LOWFST  NUMBERFO  CYCLE  ON  ATTACH  OP  PURGE. 

ALLOWS  MULTI-pfaO  ACCE'^S  On  ATTACH  (SIMULTANEOUS  USE  BY 
CIeFFRFNT  JOBS).  ALSO,  JOB  May  of  PPRUN  BY  SYSTEM  IF  ERROR. 
A FILE  ATTACHEO  WITH  PFAD-onlY  PERMISSION  CANNOT  BE  PURGED, 

rfnamfo  or  extended. 

PETFNTTON  PERIOD  IN  DAYS,  UP  TO  7?0.  (DEFAULT:  30) 

TURNKEY  PASSWORD 
READ  PASSWORD 

PASSWORO  OEeii^iTION  EOP  •’EAO-ONLY  FILES.  SETS  CN,  MD,  EX. 
USED  ON  catalog  TNSTEAD  OF  mp=i  qn  ATTACH. 

EXTEND  PASSWORD 
MOOTEY  PASSWORD 
CONTPOL  PASSWORD 


NOTE:  THF  ABOVE  PASSWORDS  APE  l-q  AlPHAMEPIC  CHAPACTERS  AND 

APE  USED  only  to  DEFINE  PASSWORDS  ON  CATALOG  OR  RENAME. 

PW  = LIST  USEO  to  StJPMIT  PASSWOPOS.  A MAXIMUM  OF  FIVE  <B)  PASSWORDS  FOR 
ATTACH  OP  EOP  CATALOG  OF  A NEW  CYCLE. 


»•*  HINTS  ON  PERMANENT  FILE  USAGE  »** 

1.  attempt  to  PURGE  A NON-EXISTING  FILE  WILL  BE  FLAGGED  BUT  NON-FATAL. 
R.  CATALOG  WITHOUT  CY=  PAPAHETEP  EOR  RPE-EXTSTING  ERE  WILL  CATALOG  THE 
KEXT  higher  CYCLE  IE  CONTROL  PERMISSION  IS  GRANTED. 

3.  ETLFS  should  be  cataloged  with  XR  and  pw  PASSWORDS  TO  TAKE  FULL 
ACVANTAGE  OF  MULTIPLF  READ  ON  ATTACH  AND  MULTIPLE  CYCLES  ON  CATALOG. 

4.  eySTFM  permanent  files  WILL  HAVF  PUBLIC  ACCFSS  ID  AND  MAY  BE 

attached  py  pen  alone. 


F X Amplfs 

CATALOG  ,L  GO,  SPSOBJ.IDrXX  XX,  AC=inl  nil  1 1 , X P =RE  A D,  p W = R AO. 

(TDFNTTrAl  fATALOG  WHL  CPF  ATF  AN  ADDITIONAL  CYCLE) 
AT T ACH,SPSOBJ , ID=XXYX.  ONI  Y read  PFPMISSION,  LEN  IS  PEN 

PUPGE,CLD,SPSOPJ,in=XXXx.pWrorAn,! C-1.  DISCARD  LOWEST  CY 

AT  TArH,SC40R0  . A SYSTEM  LItIPAOY,  ID  NOT  PEQUIRFO 

CATALOG, ANYCPL, rO^'xXXX,  XPrPP,PwrPO.  JOB  AC  USEO 
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*»*  PERMANENT  EILF  USER  RETURN  CODES 

PERMANENT  FILE  ERRORS  APE  REFERENCFn  9Y  THE  ERROR  NUMBER.  INTERCOM 
REEEPENCES  ARE  OECIMaL  COOES. 


Ecieai. 

QCIAL 

0 

000 

1 

001 

? 

002 

T 

003 

4 

004 

006 

6 

006 

7 

007 

8 

010 

9 

Oil 

10 

012 

11 

013 

12 

014 

13 

016 

14 

016 

16 

017 

16 

020 

17 

021 

18 

022 

1° 

023 

?0 

024 

?1 

026 

?? 

026 

?3 

027 

24 

030 

26 

031 

26 

032 

27 

033 

28 

0 34 

29 

036 

30 

0 36 

31 

037 

3 2 

040 

3 3 

041 

34 

042 

36 

04  ^ 

3P-66 

044-067 

6 6 

070 

67 

071 

68 

07-» 

C Q 

0 73 

60 

0 74 

UEAt/Ifili SEL£I£D_CQMMAIJDS 

FUNCTION  SUCCESSFUL 
PEN/in  ERROR 


LEN  ALREADY  IN  USE 

attach 

UNKNOWN  LEN 

catalog. 

EXTEND, 

PURGE,  RENAME 

ND  ROOM  FOP  EXTRA  CYCLE  (6  MAX) 

CATALOG 

PE  CATALOG  FULL 

CATALOG, 

EXTEND 

NO  LEN  OP  PEN 
(NOT  USED) 

LATEST  INDEX  NOT  WRITTEN  FOR 

CATALOG, 

EXTEND 

A RANDOM  FILE 

file  not  ON  A PE  DEVICE 

CATALOG 

FILE  NOT  CATALOGED, SN=XXXXXXX 

ATTACH 

ARCHIVE  RETRIEVAL  ABORTED 

ATTACH 

(NOT  USED) 

CY  # LIMIT  PEACHED  (999) 

CATALOG 

PE  DIRECTORY  FULL 

CATALOG 

function  attempted  on 

CATALOG, 

EXTEND, 

non-permanent  file 

PURGE,  RENAME 

^UNCTION  ATTEMPTEO  ON 
NON-LOCAL  FILE 
<NOT  USED) 

FILE  NEVER  ASSIGNED  TO  A DEVICE  CATALOG 
<EILE  NEVER  WRITTEN  ON) 

CYCLE  INCOMPLETE 
PE  ALREADY  ATTACHED 
FILE  UNAVAILABLE 
(NOT  USED) 

ILLEGAL  IFN 
EILP  DUMPED 
ILLEGAL  FUNCTION  CODE 
(NOT  USED) 

alter  needs  exclusive  access 

(NOT  USED) 

ETLE  ALREADY  IN  SYSTEM 
(NOT  USED) 

(NOT  USED) 

ILLEGAL  SETNAME  SPECIPIED 
DEVICE  SET  NOT  COUNTED  AT 
CONTROL  PPINT 

ROT  CHAIN  TOO  LAPEE  FOR  PEC 

file  resides  on  unavailable  device 

(NOT  USED) 

PEM  STOPPED  PY  SYSTEM 
INCORPECT  PEPMTSSION 
FOB  ADOPESS  INVALIO 
I/O  ERROR  ON  PED/PEC  WRITP 

ST  PAPAMETPP  ILLEGA'  WITH  USER  DEVICE  SET 


ATTACH 

ATTACH 

ATTACH 

ATTACH 

ALTER 
CA I ALOG 
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*•*  PFR»'RMENT  FILE  EXAMPLES  *** 


rONSTPUCT  PERMANENT  FILE  FROM  CAROS 

JOB  CARO 

CHARGE  CARD 

RECUEST,PROGt»PF. 

CnPVCR(INPUT,PROG)  *»  OR  COP YR, I NPUT » PROG , C . 

CATALOG(PROG,PROGRAM, ID=XXXX,CN=RESFRVE)  *•  PREVENT  UNINTENTIONAL  PURGE 
» 7/8/q  FOR 

(ALL  OFCKS  TO  BE  MADE  PART  OF  PERMANENT  FILE) 

~ f./7/8/q  EOF 


USE  OF  PERMANENT  SOURCE  FILE 

JOB  CARO 
CHARGE  CARO 

ATTACH, USEIT, PROGRAM, TO=XXXX,MR=l.  •*  ALLOWS  MULTIPLE  READ 

FTN (I=USETT,OPT=l) 

. OTHER  CONTROL  CAROS  AS  REQUIRED 


7/8/0  EOR 

(DATA  CAROS,  IF  REQUIRED) 
6/7/8/0  EOF 


PURGE  OBSOLETE  FILE 

JOB  CARD 
CHARGE  CARO 

PURGE, NCG00D,0LDEILE,T0=XXXX,PM=RESERVE)  ••  ALLOW  CONTROL 

PERMISSION 

” 6/7/8/0  EOF 
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CATALOG  NFW  CYCLF  OF  FXISTTNG  FRF 

JOR  CAPO 

CHAPGF  CAPO 

9FCIJFST,NFWCYC,*PF. 

ATTACH, PPOG»PPOGPAM,ID=CASG.  ♦*  HO  MULTIPLE  READ  HHILE  MODIFY 

COPYP (INPUT, NFWCYC) 

COF YF (PROG,NFWCYC)  **  ADD  OLD  INFO  TO  NEWCYC 

CA  TALOG,NEHC YC, PROGRAM, I 0 = XXXX,PW  = PESFPVE. 

»*  HILL  ASSIGN  NEXT  CYCLE  NUMBER 
(UP  TO  999) 

• 7/R/q  FOR 

(NEW  CAROS  TO  BE  PUT  INTO  NEXT  CYCLE) 

~ 6/7/B/9  EOE 


REPLACE  JOB  NUMBER,  ADD  PERMISSIONS 


JOR  CAPO 
CHARGE  CARD 

ATT  A CH, PROG, PROGR AM , 1 0= XX XX , PW= RESER VE . 

COMMENT.  NOTE  MULTIPLE  READ  MUST  NOT  RE  ALLOWFO 


RENAMF,PROG, A C=NRWJOBNMRP, EX= RESERVE, MO=RESERVE. 
COMMENT.  PF  NAME  STAYS  THE  SAME  - ALL  CYCLES 

COMMENT.  NEW  JOB  ORDER  NUMBER  - THIS  CYCLE 

comment.  additional  PASSWORDS  - ALL  CYCLES 

••  6/7/B/9  EOF 


* * 


control 


PERMISSION 


extend  existing  file 

INFORMATION  MAY  BF  ADDED  TO  AN  EXISTING  PERMANENT  FILE  ONLY  AT  THE 

end-cf-tnformation  (Eoi).  this  example  illustrates  adding  one  record 

TO  A FILE.  999  IN  THE  FIRST  COPYR  SHOULD  BE  SUFFICIENT  TO  BYPASS  ALL 
EXl<^TTNr,  RECORDS.  TF  AN  ENC-OF-FILF  EXISTS,  THE  SECOND  COPYR  WILL 
ABORT  SINCE  THE  FILE  IS  NOT  AT  FOI.  THEREFORE,  THE  ALTER  IS  NEEDED  TO 
REFCSITION  THE  EOI  (ANY  INFORMATION  PAST  THIS  POINT  IN  THE  ORIGINAL 
ETLP  IS  LOST).  NOTE  THAT  ALTEP  WTLI-  PUT  2 LINES  BEGINNING  WITH  'EX' 
INTO  THE  CAYFILF. 

. OThEp  CONTROL  CAPOS  AS  REOUIPED 


ATTACH, data, TD=XXXX,PW= large. 
COMMENT.  NCTc  multiple  PFAD 

C0EYR,nflTA,TE«P,999. 

AL TER, DATA. 

COFVR, INPUT, DATA. 

EXTEND, DATA. 


*•  EXTEND  PERMISSION 

MUSI  not  be  allowed. 

**  POSITIDN  TO  END  OP  DATA 

rpposttion  eoi 

•»  ADO  NEW  RECORD 
Rf POSITION  EOI 


7/0/9  roR 

(NPW  DATA  RECORD  TD  BE  ADDPD) 
E/7/0/9  FOE 
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•**  nFVICP  SETS  •** 

CN  ^T^sp^c  mr  fooo  computfps  somf  of  the  ppmovable  disk  packs  are 

AVAUAPLP  POP  USEPS.  OFVICF  SETS  (OS)  UNOFP  NOS/BE  1.0  HAVE  SEVERAL 
flnvBNTflGFS  OVPP  THF  PPTVATF  DISK  PACKS  FOPMFPLY  USED  ON  SCOPE  3.3. 

TMF  rWNFP  n<^  A OS  HAS  ALL  CAPABILITIES  NECESSARY  TO  MANAGE  HIS  OWN 
PFP^'eNFNT  FTLP  SYSTEM.  USFP  FILES  MAY  BE  WRITTEN  TO  A OS  AND  MADE 
proMANFNT  USING  STANDAPO  PERMANENT  FILE  CONTROL  CAPOS  WITH  ONE 

aopittonal  papamftpp.  a ns  MAY  BE  usEn  by  several  jobs  simultaneously. 

JPPS  OK  BOTH  THF  B(S00  AND  E7Q0  MAY  ACCESS  A GIVEN  OS  SIMULTANEOUSLY. 

THE  '^TANOAPO  auott  control  capo  containing  one  additional  parameter  is 
usrr  TO  list  thf  contents  of  the  pack,  all  audit  options  are 
AVAILAPLE.  each  pack  has  a unique  volume  serial  number  (VSN). 

CEVICE  SFTS  SHOULD  NOT  BE  USED  FOR  ON-LINE  STORAGE  (USE  PERMANENT 
FILFF  TNSTFAD).  nos/be  l.n  TREATS  DEVICE  SETS  THE  SAME  AS  MAGNETIC 
TAPFC.  thfpf  ape  a limited  NUMBER  OF  DRIVES  FOP  DEVICE  SETS.  JOBS 
pfcuTPTNG  them  muS'^  wait  until  thf  required  ORIVE(S)  are  AVAILABLE. 

IT  IS  the  USER'S  RESPONSIBILITY  TO  PROVIDE  BACKUP  (TAPE  OR  DISK) 

FOP  device  SETS.  THF  COMPUTER  CENTER  PROVIDES  PERIODIC  BACKUP  FOR 
FILFf  ON  PUBLIC  OFVICFS  ONLY. 

pfvtcf  set  packs  APf  assigned  by  THE  TAPE  LIBRARIAN,  CODE  18B6, 
(?r?)  ?27-l??7.  with  INFORMATION  PROVIDED  BY  THE  OWNER,  USER  SERVICES 
MUST  IMTTALI7E  THF  PACK  WITH  LABEL,  WRITE  SYSTEM  FLAW  MESSAGES  SO  THAT 
DATA  WTlL  not  F;iy<5F  UNC  0 R RE  CT  A RLE  RMS  ERRORS,  AND  CREATE  ON  THE  DS  A 
SPECIAL  ffpmaNFNT  FILE  'OUM'  TO  ALLOW  BACKUP  DUMP  CAPABILITY. 
INFCRmatTON  which  must  PE  PROVIDED  INCLUOESt 

wastfp  pack  (mp)  VSN,  usually  same  as  VOLSEP 
VOLSFP  THE  UNIQUE  SIY  CHARACTER  VSN 

fft  name  (SN)  1-7  alphanumepics  starting  with  a letter 
retention  PERinn  for  the  pack  (RP)  up  to  7B0  days 

UNTOUF  on,  MO,  AND  CN  PASSWORDS  FOR  THF  'OUM'  FILE  AS  REQUIRED  FOR 
MODE  1 , 7 OP  T TAPE  BACKUP  DUMPS 
JOn  ORDER  NUMPFP  (AC)  FOR  CATALOG  OF  'DUM' 

SEE  NCCPF,  CHAPTER  A)  SCOPE,  4-??  TO  4-?5. 


•»*  DEVICE  SET  PASSWORD  ••• 

AN  AOPITtonai.  level  of  SECUPITY  FOR  DEVICE  SETS  IS  AVAILABLE  AS  A 
PAFcwoon  ON  THE  hoUNT  COMMAND.  TO  ACTIVATE  THIS  FEATURE,  THE  USER  MUST 
CATALOG  ON  THE  PACK  A FILE  WITH  PEN  AND  ID  OF  "PASSWORD"  WITH  A 1-9 
CHARACTEP  TUPNvcy  PASSWORD  (TK). 

FOP  example* 

pEOUFST,PASS,'’PE,SN=SETNAHF. 

DrwTND,PASS. 

FAT  ALOG, PASS, PASS WORD, ID  = P ASS WORD, TK  = XXXX. 

EACH  MruNT  CARD  FOP  THAT  PACK  MUST  THEN  INCLUDE  THE  PW  PARAMETER 
MOUNT. VSN=VOl SFP,SNrSETNAME,PW=XXXX. 
thf  prvTCF  CFT  owned  MAY  CHANGE  THIS  PASSWQPD  BY  RENAMING  THE  PASSWORD 
FILE  WTIH  A OTFFFpFMT  TUPNKEY. 
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P6USE.  JOB  PFQUIPF 
NOTIFY 

MOUNT, VSN= VOL SFR.9N 
MOUfT, V9N=V0L9FR,SN 
PFQUF9 
ftLRFAO 
MOUNT 
PFCOVF 

DSMCUNT,VSN=VOLSFR, 
LOGIC& 
AT  FNO 

9FTNAMF,SFTNAMF. 

FSTABL 
CAROS. 
THF  PA 

SFTNAMF. 

PF-EST 

PFQUES 

RFCUFST,LFN,*PF,SN= 

RFCUFST,LFN,*PF,SN. 

PFOUFS 

ATTACH,LFN,ln=XXXX, 
ATTACH, LFN,Tn=XXXX. 

ATTACH 

CATALOG  CAROS  ANO  0 
PERMANENT  FILE  OEVT 


DEVICE  SPT  CONTROL  CARDS 


S DISK  PACK  VOLSFR. 

OPERATOR  TO  PREPARE  REQUIRED  PACK  FOR  MOUNTING. 
=SETNAMF. 

=SFTNAME,PW= USER PASS. 

T AN  EXISTING  DS  10  BE  PHYSICALLY  MOUNTFD  (IF  NOT 
Y MOUNTED)  AND  LOGICALLY  ASSOCIATED  WITH  THIS  JOB. 
CARD  MUST  PRECEDE  ALL  OTHER  PS  CONTROL  CARDS  EXCEPT 
P (SEF  CCRM,  3-1?). 

SN=SFTNAME. 

LLY  niSASSOCIATF  THE  OS  FROM  THIS  JOB.  (AUTOMATIC 
-OF- JOB.)  RETURNS  ALL  FILES  ATTACHED  FROM  THE  PACK. 


ISH  A DEFAULT  SN  FOR  FOLLOWING  ATTACH  ANO  REQUEST 
USE  ONLY  WHEN  ALL  FILES  TO  BE  ATTACHED  RESIDE  ON 
CK. 


ABLISHES  THF  SYSTEM  DEVICE 

T. 


SETNAMF. 

(IF 

po 

FCFDFD 

BY 

T FILE  LFN 

BF 

WR 

THEN 

ON  T 

sn=setnamf 

f • • • 

(IF 

PR 

FCEDFD 

BY 

THF 

INOIC 

AIFD 

P 

FRM ANE 

NT  F 

THFR 

ATTAC 

H PA 

RA 

MEIERS 

ARF 

CES. 

FILE 

S AR 

c 

REMOVED  FP 

AS  DEFAULT  fqR  ATTACH  ANO 


SE 

TNAMF  1 

CA 

PD) 

HE 

OS. 

SE 

TNAME  1 

CA 
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nrvrcE  s"!  utilitieg 

AIjntT  THt^  FTLES  OF  XXXX  ON  OS  'SETNflMF'. 

^,Pf:  rrPM  l-«4  FOP  OTHPP  fiUOIT  PAPAMETERS. 

riJ'^PF  tPW  = PCPASSW,SN  = SFTNAME) 

,'DPflTr  OACXljP  TAPE  PUMP  OF  ALL  FILES  ON  OS. 

SFF  example  fop  COPPECr  SEOUENCE  OF  INSTRUCTIONS. 

LCAOPF (SN=SFTNA“F ) 

PFLOao  all  files  FPCM  tape  to  SFT. 

LOACPF  f r , SN  = SFT  NAME ) 

ALLOWS  FOP  SELFCTIVE  LCAO  OF  FILES,  USING  DATA  CAROS 
OF  rrtF  FOPMt  PF=PFN1, ID^XXXX. 

PFooVFP,  VSN= VOL  SEP, SN  = SET  NAME. 

IF  A MflCMiNr  failure  OCCURS  WHILE  A OS  IS  MOUNTED,  THIS  UTILITY 
CNOT  PPFOEnFO  BY  A MOUNT)  VALIDATES  THE  DS,  VERIFIES  AND 
PFCPFATFS  ALL  CRITICAL  FiISK  TABLES.  (REQUIRES  PEL, 50000. > 

TRANS  PF 

utility  to  pACKUP  one  device  set  ONTO  ANOTHER  PACK.  SEE 
CCLIB/PJ  TPANPAK. 


BACKUP  DUMP 

JOE  ,MT1  ,PPl  , TFOO.  USER  NAME  CODE 

CHAFFF, XXXX, JJJJJJJJJJ. 

PAU^F.  JOP  PPOUIPFS  DISK  PACK  DVOOPO. 

MpUN  T ,ySM  = nVOOBO, SN  = SFTNAME. 

VFT  ,DUMTAPF-.-CA«888/CAAfl>)q.  OUMTAPE  AND  L=  MUST  3E  AS  SHOWN 

LAPEL  (CUMTApE,L  = 'FOUMPF  TAPE-  NE  W S , F = S,  W , D=  H Y , R I NG  ) 

OUMFE (PW=PnPASSW,SN=SFTNAMF ) 

• 7/9/0  FOP 

••  F/7/>)/0  FOE 


SELECTIVE  RELOAD 


J0P,MT1,PPI.  USER  NAME  CODE 

CM  APCP  , -/V  XX.  JJJJ  JJJJJJ. 

PAUSE,  jnn  PCOUTPFS  DISK  PACK  DV0009. 

MOLO  T , VFM- ,0  V qpPO,  SN  = SET  NAME. 

V''E  ."-IJM  r A-c  iC  A»^'ni/CA  A®  aq.  OUMTAPE  AND  L=  MUST  BE  AS  SHOWN 

LAFF  L (CUM  ; APE  ,L~?;nUMRF  ; APE-  NEWT, F = S,P,D  = HY, NOPING) 

I.  OAe  ff  ( ' , ••N-SE’'NAmF5 
' r/"/0  FOP 

PF 'MYF  ILF  I , in ;XXYX. 

PF=Myp:LEa,inrXXxy,CY-T. 
f~/?/H/q  FOE 
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•»»  TfiPF  CHAPaCTFP 1ST TCS 

TftPF  nPIVFS  ON  THF  6400  APF  ON  ONF  CHANNFL,  THUS  THEPE  ftPF  NO 
rONPURPENT  RFan  OR  WRITE  OPEPATIDNS.  THERE  ARE  TWO  CHANNELS  FOR  ^APE 
OPIVFS  ON  THF  6700  ANO  6600. 

'•YSTFM  STANOAPO  (ST)  TAPES  SHOULO  RE  LARFLLFO.  BLOCKING  HAS  FIXER 
MAKIWUP  SI7FS.  SFVFN-TRACK  TAPES  HAY  BE  ?00,  566,  OR  600  BPI  OFNSITv. 
COrFE  INFORMATION  (PV^N  PARITY)  IS  WRITTEN  IN  1?8  WORD  PHYSICAL 
PFFCRO  UNITS  (PRU).  FORTRAN  FODED  (UNIT)  RFCORRS  HA\,'F  DEFAULT  maxIMUH 
OF  150  rHAPACTPRS,  WHICH  APE  BUFFERED  INTO  THE  128  WORD  PRU.  BINARY 
(OPE  PARITY)  PRU  SIZE  IS  512  WORTS.  FORTRAN  BINARY  LOGICAL  RECORDS 
APE  BLFCKFD  INTO  THE  5i?  WORD  PHYSICAL  RECORDS  AUTOMATICALLY.  FORTRAN 
BIEAPY  LOGICAL  RFCOPOS  MAY  EXCEED  512  WORDS. 

COC'S  DFSIGNATTON  of  stranger  tapes  are  THOSE  GENERATED  PY 
FOUIFH5NT  OTHER  THAN  CDC  6000  WHICH  HAVE  A MAXIMUM  OF  512  WORD  PHYSICAL 
RECCRDS.  FORTRAN  MAY  CREATE  STRANGER  TAPES  FOR  OTHER  EQUIPMENT  BY 
USTNGt 

A)  PUFFER  OUT  STATEMENTS  TO  AVOID  HAVING  NOS/BE  LEVEL  NUMBERS? 

P)  formitTFO  WRITF  with  tape  BLOCKING  CHARACTERISTICS  DEFINED  ON 
'FTL'^'  and  'LDSft*  CARDS  (SEE  CCRM,  3-18,  2-16). 

TApFP  WITH  RECORDS  LONGER  THAN  512  WORDS  MAY  ONLY  BE  READ  AS  *L  ' TAPES. 
A ftranGFR  tape  of  unblocked  CAPO  IMAGE  OR  PRINT  IMAGE  RECORDS  MAY 
pfCLIPf  over  ONF  WALL  CLOCK  HOUR  OF  TIME  TO  READ.  IF  POSSIBLE,  READ 
SUCE  A TAPE  ONLY  ONCE  ON  CDC  6000,  WHILE  REBLOCKING  TO  A SI  FILE. 
rrPM,  6-6J  COPYRm;  CCLIB^P)  COPYBLK). 

MKF-TRACK  TAPES  (ONLY  AVAILABLE  ON  THE  CDC  6700)  APE  ALL  ODD 
parity,  with  density  of  800  BPI.  BINARY  INFORMATION  MAY  BE  PACKED  TO 
UDF  (n  8 CHANNELS  ON  THE  TAPE.  *L  ' TAPE  FORMAT  IS  NOT  PERMITTED. 

ALL  INFORMATION  CONCERNING  THF  PHYSTCAL  CHARACTERISTICS  (MODE, 

TYPE,  ’'FNSITY)  OF  THF  FILE  IS  SPECIFIED  ON  CONTROL  CARDS.  THE  TOTAL 
i|,,,RfC)  pF  tapfd  to  be  MOUNTED  SIMULTANEOUSLY  DURING  THF  JOB  IS  A 
RFC'.IPFD  PARAMFTFR  DN  THF  JOB  CARD.  VSN  ANO  LABEL  (OR  REQUEST) 
TNFf-pMflTirN  IS  REOUIRFO  FOR  EACH  TAPE.  THE  LABEL  CARD  SHOULD  BE  PLACED 
JU^T  qFrrior  LOAOTNC,  THE  PROGRAM  WHICH  REQUIRES  THE  TAPE.  THUS,  IF  THE 
PRPVTOIJ*-  STFO  FAILS,  THF  JOB  WILL  ABORT  WITHOUT  CAUSING  T^p  OPERATOR 
TP  ‘-FONT  THF  tAPF.  SCRATCH  FILFS  SHOULD  BF  ON  DISK,  NOT  ON  TAPE. 
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***  TAPF  ASSIf.NMFNT  •»* 

Twr  cLfissps  Of-  tapf  stopage  apf  ppovintn  in  thf  cohputep  cemep. 

TAFCC  WHICH  APF  SFLPOH  USED  ON  TH'  CDC  FOOD  SF^IES  COMPUT<"PS,  WHICH 
WILL  f>E  UCFT  <^N  SFVrPAL  DIFFEPENI  CYSTFHC,  OP  WHICH  A»E  NOPMALLY 
PFTAINFp  f^Y  THF  OWNfP  APE  AGSIGNTi  ft  TEHPOPAPY  CLOT  NUMBFP  FQP  UP  TO 
A ?ft_HCUP  WHICH  PFPIOn  AT  THE  ADP  CONTROL  C^NTEP  OF  THE  COMPUTER  FOR 
THFY  AP<^  TNTFNDEO.  at  TH*"  FNO  OF  THE  DAY'S  PPOCFSCING  (OR  EARLIER  AT 
THE  L'SFP’S  PFOUFST)  THESE  ARE  priUPMED  TO  THE  USER  AND  WILL  REQUIRE  A 
niFFFRFNT  SLOT  NUMBER  ASSIGNMENT  FOP  NFYT  USE. 

\J9h'0  ON  THE  CDC  GQOO  TS  'SLOTYY^IO' 

WHFpr  XX  IS  the  ASSIGNPO  SLOT 

in  IS  THF  USER'S  EXTERNAL  STICKER  ON  THF  TAPE  RRFL 
(NOT  PXCEROING  SIX  (G»  CHARACTERS). 

TARES  WHICH  ARE  USFO  FPFQUFNTLY  SHOULD  BE  PERMANENTLY  STORED  AT 
THE  FRCPFR  COMPUTER  (T.F.,  G700/6GOO  OP  6400)  IN  THE  OTEOOLD  CABINETS 
WHICH  ARE  LARGE  ROTATING  STORAGE  TOP  SEVERAL  HUNDRED  TAPES.  THESR 
TAFF«-  APE  assigned  A PERMANENT  FXTFrnAL  LABEL  (AND  VRNO)  WITH  FILE 
NLIMRER,  SHELF  NUMBER,  AND  TAPE  NUMOFP  SUCH  AS  'CA019Q'. 

FOP  ASSIGNMENT  OF  TAPE  STORAGE  LOCATIONS  AND  6000  SERIES  VISUAL 
PEEL  NU-RFPS  SEE  THE  TAPE  LTBPAPIAN,  CODE  1B06,  (20?)  227-1227. 


j 


♦»»  TAPE  USAGE  AND  CLEANING  *** 

TAPES  SHOULD  BE  STORED  IN  CLOSED  CONTAINERS  IN  RACKS  WHICH  GIVE 
THEM  VERTICAL  SUPPORT.  TAPES  MAY  NOT  RE  SPLICED.  THEY  SHOULD  EE  READ 
AND  RPWCUND  EVERY  SIX  MONTHS  AT  LEAST.  LOGS  SHOULD  BE  KEPT  ON  CREATION 
DATPS  OF  TAPES.  OLD  TAPES  MAY  BE  CONSIDEREO  FOP  REPLACEMENT. 

ALL  TAPES  USED  ON  CDC  600^  rOMPUTFRS  SHOULD  BE  STANDARD  LABELLED. 
STPAKGEP  TAPES  SHOULD  BE  PPAO  ONCO  AND  COPIED  TO  SI  TAPES. 

IF  SURFACP  DIPT  CAUSES  PAPITY  ERPOPS  ON  A TAPE,  THE  TAPE  SHOULD 
BE  cleaned.  THIS  DEE-LINE  PROCESS  DDES  NOT  DESTROY  THE  INFORMATION  ON 
the  TAPE.  SURMTT  OEE-LINO  WORK  RROUEST  TO  THE  TAPE  LIBRARIAN.  IE  A 
TAP«^  PECOtVOS  HPAVY  USAGE,  GLOAMING  IT  AFTER  TEN  OP  MORE  USES  MAY 
RFPUCE  THE  INCTOENCE  OF  PARITY  ERRORS. 

IE,  AETPP  a TAPE  HAS  BFFN  CLOANED,  TT  STILL  HAS  MANY  PARITY  EPPOPS, 
TT  SHOULO  RE  RXCHAMGER  ERR  A NEW  RLANK  TAPE.  THE  USER  MUST  RE  SURF  THE 
FTLO(S)  CAN  RE  Ro-CRFATon  ON  thf  N'^  W TARE. 

A RFQUFST  TO  TOST  OR  CEPTTOY  A TAPE  WILL  DESTROY  ANY  TNOORMATIQN  ON 
THO  TAPO. 

PLEASE  NOTIFY  GEORGE  SMITH,  CODO  1692.1,  (202)  227-1907,  OF  ANY 
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*»»  VSN  *** 

ALL  JORS  WHICH  USE  MAGNETIC  TAPE,  LARELLED  OR  UNLABELLED,  MUST 
USE  THE  *VSN*  CONTROL  CARD  CP  THE  *VSN=*  PARAMETER  ON  THE  LABEL  OR 
REOL'EST  CARD.  VSN  CARDS  MUST  PRECEDE  THE  LABEL  OR  REQUEST  CARD  FOR  THE 
file  named.  a single  card  can  CONTAIN  DECLARATIONS  FOR  SEVERAL  FILE 
NAMES.  IF  A logical  FILE  NAMF  IS  REUSED  BY  A DIFFERENT  REEL  DUPING  ONE 
JOB,  THE  UNLOAD  OR  RETURN  CARO  MUST  PRECEDE  THE  VSN  CONTROL  CARD  FOR 
THE  SECOND  FILE.  «^ACH  VOLUME  SERIAL  NUMBER  IS  A MAXIMUM  OF  SIX  (6) 
CHARACTERS.  THE  SLOT  IDENTIFICATION  ON  VSN  CAROS  SHOULD  PRECEDE  THE 
external  STICKER  LABEL,  SEPARATED  BY  BE  EXTREMELY  CAREFUL  OF 

0 (2E“0)  AND  0 (OH)  CHARACTERS  AS  A COMPUTER  PROGRAM  CHECKS  THIS  LAPEL. 

UNLAPFLLFb  TAPES  RFOUIPF  OPERATOR  INTERVENTION  EACH  TIME  THEY  APE 
MOUNTED  AND  SHOULD  BE  AVOIOEO. 

VSN (LFN1=VSN1 ,LFN?=VSN?.. . ) 0IE80LD  TAPE 

VSN (LFNM-VSNl/VSN?)  MULTIREEL  FILE 

VSN(LFNS=VSN1=VSN?)  slot  tape  or  OTHER  REEL  WHERE 

PHYSICAL  STORAGE  LABEL  IS  NOT 
SAMF  AS  TAPE  LABEL  AT  ORIGINAL 
WRITE 

VSN(LFNS-VSN11=VSN1?/VSN21=VSN??)  MULTI-REEL  SLOT  TAPES 

LENT  IS  LOCAL  FILE  NAMF  ON  A SUBSEQUENT  LABEL  OR 
REQUEST  CONTROL  CARO. 

VSNI  IS  VOLUME  SERIAL  NUMBER,  E.G.  CA0599  OR  SLOTRB. 

NO  MORE  THAN  SIX  CHARACTERS. 

SLOT  TARES  NEED  THE  ALTERNATE  TAPE  VOLUME  SPECIFICATION. 

WHEN  TWO  CP  MORE  S I X-CH AR A C TER  VSNI  ARE  EQUATED,  THE  COMPUTER  WILL 
ALLOW  EITHER  OE  THE  REQUESTED  VOLUME  SERIAL  NUMBERS.  (SEE  NOSBE,  4-30; 
SCOPE,  4-3G) 

FOR  MULTIREEL  EILFS  SEPARATE  THE  VSNI  BY  SLASHES. 

examples 

1.  SINGLE  PEEL  FILES  (DIEBOLO  TAPES) 

LARFL, OLDPL,L  = XX  XXL  IBP, P, D=HY, NOPING, VSN  = C AO  ?99. 
LABFL,NEWPL,L=XXXXLTBR1 ,W, n=HY ,R1NG, VSN=CAQ?QB. 

?.  3-RFFL  FILE  (OIFROLO  TAPES) 

VSN,MTSFILE=CA0XAB/CA04B9/CB1099 . 

RFQUEST,MISFILF,HY,NORING.  (CAD38B,CA04flE,CR1095) 

3.  SLOT  TAPF  WTTH  ACTUAL  LABEL  SG040? 

VSN (TAPESS=SLOT14=SG04n?)  •*  SLOTXX  ORFCFOES  STICKER  LABEL 

• • • 

LABFI.  , T APE9S,L=r,ASr.0ATAF9,P,D  = HY  , NOR  TNG.  ( SL  OT  1 4 , SGO  4 0 2 ) 

4.  2-RFFL  file  of  slot  TAPES 
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labeller  tapes 

ST  TAPES  SHOULR  ALL  BE  LABELLER.  THE  LABEL  CARO  IS  USED  INSTEAD  OE 
A PEGUEST  CARD.  SEE  THE  TAPE  LIBRARIAN,  CODE  1A96,  l?02)  3?7-12?7,  FOR 
ASSIGNMENT  DE  bOOO  VRNO  tVISUAL  REEL  NUMBER). 


L APEL  (LFN,L=XXXXN,  R.NnRINE,,  D=7,E  = Z,  t = 7 , VS N=  VRNO) 

LEN  IS  THE  LOGICAL  EILP  NAME  (SAME  AS  ON  OTHER  CAROS 
REEERPNCING  THE  EILP) 

XXXXN  IS  EILP  LABEL  NAME  UP  TO  17  CHARACTERS. 

FIRST  FOUR  SHOULD  BE  XXXX  FROM  CHARGE  CARO. 

R TS  W WHEN  WRITING  THE  LABEL  ON  TAPE  USING  SUPPLIED 

parameters. 

R WHEN  READING  LABEL,  WILL  CHECK  AGAINST  SUPPLIED 

parameters. 

KORING  IS  RING  IE  TAPE  IS  TO  BE  WRITTEN 

NOPING  IF  TAPE  TS  TO  BE  READ  ONLY  (DEFAULT) 

r=  TAPP  AND  LABEL  DENSITY 

MY  BOO  BPI  7-TRACK  TAPE 

HI  BB6  BPI  7-TRACK  TAPE 

LO  POO  BPI  7-TPACK  TAPE 

HD  BOO  BPI  q-TRACK  TAPE  (NO  L TAPES) 

E=  E PARAMETER  OMITTED  FOR  ST  TAPE. 

S STRANGER  TAPE  (FOR  OFFLINE  DEVICE  SUCH  AS  SC4060) 

L LONG  STRANGER  TAPE 

T=  RETENTION  PERIOD  (1  TO  3 NUMBERS)  (DEFAULT  IS  1 DAY) 

SYSTEM  WILL  NOT  ALLOW  »W'  (REWRITE  LABEL)  IE  LABEL 
RETENTION  HAS  NOT  EXPIRED. 

VSN=VRNO  6-CHARACTER  VISUAL  REEL  NUMBER  (CABINET,  SHELF,  SLOT) 

FOR  INTERNAL  CHECKING.  OPTIONAL  IE  VSN  CARD  IS  USED. 
MUST  USE  SEPARATE  VSN  CARD  FOR  MULTIREEL  OR  SLOT  TAPES. 

comments  to  THE  OPERATOR  MAY  BE  WRITTEN  BETWEEN  COL  50  AND  COL  70. 


9-TPACK  TAPE  USE  MAY  PEQUIPE  ADDITIONAL  PARAMETERS  (SEE  NOS8E,  4-50; 
SEOPE,  A-3?).  (E.G.,  N=FB  INDICATES  EBCDIC  CHARACTERS) 
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•»*  'INLABELLEn  TAPES 

UNLARElLFn  TAPES  SHRULD  BE  AVOIBEP,  IF  POSSIBLE.  THEY  ARE  OFTEN 
USED  TO  TRANSPFR  FILES  BETWEEN  THF  CDC  6000  ANO  OTHER  HARDWARE.  WHEN 
THEY  APE  REOIJTRED,  THE  REQUEST  CARO  IS  USED  INSTEAD  OF  A LABEL  CARO. 


RECL'EST  ,LEN,  0T,NORTNG,TYPE.  (VRNOl 

RE OUEST.LEN.BT, NORING, TYPE, VSN=VRNO. 


where 

DT 


IS  THE  DENSITY 

HY  - HOO  RPI  7-TRACK  TAPE  (HYPER  DENSITY) 

HI  - GS6  BOI  7-TRACK  TAPE  (HIGH  DENSITY) 

HD  - «00  BPI  9-TPACK  TAPE  (HIGH  DENSITY)  (NO  L TAPES) 


NORING  IS  RING 

NORING 


IE  TAPE  IS  TO  BE  WRITTEN 

IF  TAPE  IS  TO  BE  READ  ONLY  (DEFAULT) 


TYPE  IS  THE  DATA  FORMAT 

S - A STRANGER  TAPE  WITH  PHYSICAL  RECORD  SIZE  NOT 
EXCEEDING  51?  WORDS. 

L - A STRANGER  TAPE  WITH  RECORDS  OVER  512  WORDS 
(7-TPACK  ONLY) 


VSN=VRNO  6-CHAPACTER  VISUAL  PEEL  NUMBER  (CABINET,  SHELF, 

NUMBER).  FOR  INTERNAL  CHECKING.  OPTIONAL  IE  VSN 
CARO  IS  USED.  MUST  USE  SEPARATE  VSN  CARD  FOR 
MULTIREEL  OR  SLOT  TAPES. 


FOR  SI  TAPES  (COOED  OR  BINARY),  USER  MUST  OMIT  'TYPE*  KEYWORD. 

AN  AODITIONAL  PARAMETER,  EB,  IS  NEEDED  FOR  9-TRACK  TAPES  IN  EBCDIC. 
IE  VSN=VPND  IS  NOT  USED,  A SEPARATE  VSN  CARO  IS  REQUIRED. 
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»»*  nFSCF’T'UNC  A FIIF  **♦ 

FATh  FTt,E  ACCFSFrn  o)y  PFCnRH  mANAGFP  -FAS  AN  ASSOCIATrn  file 

TT  CN  TAOLf"  FFTT)  WHICH  OFFINFS  T HF  fILF  AND  HOW  IF  IS  ACCESSFO. 
IHF  rC*'PTLFPS  DFPIFJF  THF  FIT'S  FpoiJIRFD  FQP  THF  PROGRAM  ANO  INITIALI7F 
IMF"  IF  nFFAULT  QR  IJSF  o-SlJPPL  IFFi  VAUJFS.  AT  FXFCUTIDN  T I M‘  , THIS 
INFCRMATTON  MAY  Rp  rHf.NF,Fn  ny  MrftNS  OF  THf  'FRf'  CONTROL  CAPO.  IN  THIS 

WAY,  FTLFS  CRFATFO  oy  a program  wpttifn  in  onf  language  may  be  RFAC  by 
ONF  WRITTEN  IN  ANOTHER  LANGUAGE  (F.G,,  FILES  WRITIFN  BY  COBOL  MAY  PF 
REAP  BY  FORTRAN  PROGRAMS). 


FTLF,LFN,<PARAHFyrps>. 

WHFOf  lFM  is  the  FILF  WHOSE  Til  I',  TO  RF  MODIFIED 

<PA°AMETFRS>  ARE  THF  VARIOUS  FIELDS  OF  THE  FIT  (HIGH  MAY  BE 
USEP-DFE I NEP.  ALL  ARF  IN  KEYWORD  FORM 
( KF  YWOROrVALUF ) . 

A FEW  OF  THf  KEYWORDS  ARE) 


BES 

buffer  LENGTH  (TAPE  FRE) 

BT 

BLOCK  TYPE 

CM 

CONVERSION  *-ODr  ( inPE 

FILE  ) 

FO 

FRROR  OPTION  (TAPF  RARITY  ERRORS) 

F RL 

MAXIMUM  non-fa  I AL  ERROR  LIMIT 

FO 

FILE  ORGANI/ATION 

KL 

KTY  length 

Lt  N 

RPPLACFMFNl  FILi  NAME 

(SEE  LAST  EXAMPLE  BELOW) 

MRL 

MAXIMUM  BLOCK  LENGTH 

MNP 

MINIMUM  RECORD  LENGTH 
LENGTH  RFCOROS) 

(VARIABLE 

MPL/FL 

MAXIMUM  RFCORD  LENGTH 

PB 

number  of  RFCORDS  pfp 

BLOCK 

PT 

RECORD  tyre 

SOS 

system  dayftlf  statistics 

(CFF  FTN,  1G-G;  FTN/S,  TTI-G-bl  RMCOB,  APPENDIX  BI  RMFTN,  APPENPIX  C) 


’ sample  filf  cards 

t 

I FILF  .R'^T,  BT  = C,RT  = 7,mdl=1S0. 

7FR0-RYTE  TERMINATED  FILE  FOR  PRINTING 

fILF,STPANG,RB  = TO  ,mpl  = ‘^0,  MPL  = KOO,  RT=F  ,BT=<,EO-A  ,ERL  = 2G,0FS=S1  7,  CH  = YES. 

STRANGFP  BLOCKED  COfEO  lAPF 

FILF,STS,Fn=TS,RT  = F,KT  = S,KL  = l 0 , MRL - 1 0 0 , RB  = G , SOS  = Y FS . 

INOFYFO  SEQUENTIAL  FILE 

FTLF.UNBL  ,BT-r;,RT  = S.  FORTRAN  BINARY  1.  T COMPATIBLE  (UNBLOCKED)  FILE 

FTLF, input, LFN=OATA.  SUBSTTTUT'^  ALTERNATE  INPUT  FILE  FOR  COBOL  PROG. 


A LOSFT  OAPP  (CCRM,  2-1  F.)  If  NFEOED  TO  MAKE  THE  INFORMATION  ON  THE 
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♦**  TNOFXEn  GFQUENTIAL  *•» 

f^yoEP  PrcnPD  HANAGFP  WITH  FILE  OPGANIZATION  TYPP  KNOWN  AS  INOFXFD 
SFCLIFNTTAL  (F0=IS)  RFPLACED  FORMEP  scope  INOEXED  sequential  (SIS) 
VERSION  Z.P. 

SCOPF  3.3  COBOL  SOURCE  PROGRAMS  USING  SIS  VIA  'ENTER  ROUTINE-NAME* 
WILL  CCMPTLP  and  execute  CORRECTLY  UNDER  SCOPE  3.<«  IE  THE  7 OPTION  FOR 
SCOPE  3.-?  COMPATIBILITY  IS  SELECTED  ON  THE  COBOL  CONTROL  CARD.  IE  THE 
7 CFTICN  IS  NOT  SELECTED,  TEE  PROGRAM  MUST  BE  CHANGED  TO  USE  THE  NEW 
language  specifications  to  DESCRIBE  AND  PROCESS  AN  INDEXED  SEQUENTIAL 
FILE. 


RUN  STATISTICS  ON  FILE  USAGE  (E.G.,  NUMBER  OE  ACCESSES)  ARE  PLACED 
IN  THE  error  file  77ZZZEE.  IE  THE  USER  DESIRES  THE  STATISTICS  IN  THE 
DAYFILE,  use  a file  CARD  TO  INDICATE  SDS=YES. 

EXAMPLE--THE  EOLLOWING  ILLUSTRATES  EXECUTION  OE  COBOL  PROGRAM 
WHICH  CREATES  A SISEILE  WITH  THE  LOCAL  FILE  NAME  OE 
MYEIL  AND  UTILIZES  SOME  OE  THE  ABOVE  DESCRIBED  OPTIONS. 

JOBNAME,....  NAME  / CODE 

CHARGE,.... 

COPOL (LR, U,DB, Z) 

FILE (MYEIL, SDS=YES) 

LDSFT (EILES=MYEIL) 

LGO. 

' 7/3/q  FOR 

GZ7/»)/Q  FOE 

THE  INDEXED  SEQUENTIAL  FILE  UTILITIES  DUMPS,  DUMPC,  CREATE,  DUMPR, 

AND  RELOADR  are  NOT  INCLUDED  IN  NOS/BE  1.0  OR  SCOPE  3.4  BECAUSE 
SIMILAR  GAPABILITIES  ARE  OFFERED  BY  RECORD  MANAGER  AND  FORM,  AND  BY 
NOS/PP  UTILITIES.  THE  UTILITIES  ESTMATE  AND  SISTAT  ARE  AVAILABLE. 

IE  A SIS  FILE  IS  TO  RE  SAVED  FOR  BACKIJR  AND  THE  STRUCTURE  OF  THE 
FILE  IS  TO  BE  UNCHANGED  WHEN  RELOADED,  THE  COPYBE  FILE  UTILITY  MAY  BE 
USED  TO  OUMR  AND  RELOAD  THE  FILE.  FILES  WHICH  WERE  DUMPED  USING  OUMPR 
UNDER  SCORE  3.3  ARP  NOT  RplCACAPLE  UNDER  NOS/BE  l.O. 

THE  FIRST  TIME  A SCOPE  3.3  IS  FILE  IS  OPENED  BY  A NOS/BE  1.0  PROGRAM, 
THE  FILE  AUTOMATICALLY  UNDPRGOFS  A CONVERSION  (THE  FSTT  IS  CHANGED) 

THAT  MAKES  TT  NO  LONGER  PROCESSARLE  BY  SCOPE  3.3  BINARIES.  THUS,  IF 
THE  FILE  IS  USEO  BY  A SERIES  OE  PROGRAM''  ANO  A CHANGE  IS  MftOE  TO  ONE 
UP  y^RP  SCUPPP  PROGRAMS,  ALL  OE  THE  PROGRAMS  MUST  BE  PECOMDILED. 
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THF  FOLLOWING  FyaN'HFG  ILLUSTWaiF  THF  USF  OF  FORM  TO  PF.RFO»M  SCOPF 
3.3  SIS  utility  FUNOT  IONO.  (OFF  FOOM,  U-i* , G-I(«) 


IN  THIS  FYAMPLF  THF  OFOUFNTI/iL  RFOOROS  OF  fl  OIS  FILF  ARF  COPIF.O  10 
a ffcupntial  filf. 


JORNaMF,....  NAMF  / OOOF 

CHAROF, .... 

FILF(SISFILF,Fn=I';,KL=10,KT=I.MNF=  1 0 00,MRL  = l 0 00  > 
filf  tSFOFlLF,FO  = S0 ,RFS  = ?FQ ,L  T- UL , B T~ C , P T = Z , MPL  = 1 0 0 0 ) 
LnSFT(FILF$=SISFILF/SFOFILF) 

FORM  . 

' 7/fl/O  FOP 

INP(OIFFILF) 
oun  SFOFILF) 

YFQ(FIN) 

b/7/«/q  FOF 

IN  this  FYAMPLF  a SIS  filf  IS  ORFATFO  FROM  A SEQUENTIAL  I N PU I FILE. 
THF  CUT  niPFCTIVF  IN  THF  FORM  CONTROL  CARDS  INDICATES  THE  KEY  TO  BE 
USED  IN  BUILDING  THF  SIS  FILF.  IN  THIS  CASE  IT  WILL  3F  A 10-CHAPACTFR 
INTEGFP  STARTING  WITH  CHARACTFR  1 OF  THF  INPUT  RECORD. 

JCRNAMF,....  IMME  / CODE 

CHARGE, .... 

file (SECFILE,RFS=2G0,LT=UI ,BT=C,RT=Z,MRL=inOO,FO=SQ) 

FILF  (SFOFILF,KT-I,KL  = 10) 

file (STSFILF,rn=IS,KL=10,MNR-1  0 00  ,MRL  = 1 0 00  , KT=  I , ERL  = 1 0 > 
FTLF(SISFILF,DP=?0,IP=20) 

LDSFT  (FILFS  = SISFILF/SEQF1LF) 

FCRH  . 

* 7/ft/p  FOR 

INP(SEQFILF) 

OUT (SISFILF,KEY=tlIlQ) 

YFQ(FIN) 

6/7/«/P  FOF 

FILF  CARO  avaiLABLF  TO  A USFP  PROGRAM  *L  DSE  T , F II.  FS  = L F N.  • 
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..♦»»  FOPTOAN  FVTrNDFO  •*♦** 

♦*»  INTPnnuCTION  *** 

NOF/RP  AT  nr^lSROC  HAS  Twn  FORTRAN  OOHDILFRSI  FORTRAN  l\l  fXTFNOFD 
(FTM  AND  THF  'RUN*  C9HPILFP  (WHICH  IS  NO  LONF.FR  SUPPORTEO  CY  CDC  OP 
DTNSPnC).  PUN  FOPTPAN  IS  NOT  DTSCUSSEO  FURTHER  IN  THIS  CHAPTER.  FOP 
RETAILS  OF  the  FTN  LANGUAGE,  SEE  PAGE  It  FTN  OR  FTN/S.  ALL  THE  SPECIAL 
library  routines  (SIN,  COS,  ...)  APf  FOR  ftn  ONLY.  THERE  ARE  SOME 
alternative  FTN-COhPATIPLF  CO^^pILFO^  DISCUSSER  AT  THE  END  OF  THIS 

CHAPTFP. 


***  FTN  CONTROL  CAPO  PARAMETERS  •** 

(SEE  FTN,  CHAPTER  10  OR  FTN/S,  CHAPTER  I-ll) 

EXAMPLES  FTN.  DEFAULTS  TO  ( A , B=L GO, BL =0 , E L = I , ER , I = I NPU I , L =OUT PJ I , 

ODT=0 ,P=0 ,PP=G, PL=S000,R=1, ROUND=*/,SL, I ) 

FTN(Gn)  COMPILE  AND  EXECUTE 
FTN, I=M YF ILF, POUND, OPT=l. 

FTN (R=RUNrHB,FL=A) 


_QEIICt;_  iCIIQbl 

A ABORT  JOB  IF  ERRORS  OCCUR  DURING  COMPILATION.  NEXT 

CONTROL  CAPO  TO  RE  EXECUTED  IS  THE  ONE  FOLLOWING  *FXIT,S.’ 
IF  NO  'EXIT,S.*  CAPO,  JOB  ENDS.  (DEFAULT) 

A=0  FONTTNUF  FVFN  IF  ERRORS  IN  COHRILATION  (FORCED  IF  D USED) 

B=PLNCHR  PPOOUCF  PUNCHED  BINARY  DECKS  OF  ALL  ROUTINES;  NO  BCD 

SFOUFMCING  AT  END  OF  CAPOS 

B=LFN  PUT  BINARY  IMAGES  ON  FILE  'LFN*;  IF  OMITTED,  LFN=LGO 

B=C  NO  BINARY  OUTPUT 


BL 

BL  = 0 
D 


FL  = F 

= T 
= A 


FR 


FP  = 


n 


GO 


T = LFF 
I 


BURSTABlE  list.  each  MAJOR  SECTION  OF  COMPILATION  LISTING 
STARTS  ON  A NEW  PAGE. 

COMPACT  LT'^T.  NEW  PAGE  fO°  FIRST  PAGE  ONLY.  (DEFAULT) 
debug  mode  (FORCES  A = C,  OPT  = f),  T) 

special  comment  cards  (C  in  column  1 AND  J IN  COLUMN  2) 

MAY  BE  USED  TO  AID  IN  DEBUGGING  FTN  RROGPAMS  WHEN  THE  'D' 
OPTION  IS  SPECIFIED.  ympse  ftatijpes  INCLUDE  ARRAY  BOUND 
CHECKING,  DUMPING  VARIABLES  WHFN  CHANGED  BY  A REPLACEMENT 

statfwfnt,  and  inter-  and  tntp a-program  tracing. 

(SEE  FTN,  CHAPTER  9?  FTN/S,  CHAPTER  I- II t DEBUG) 

list  fatal  diagnostics 

SAME  fl«:  F PLUS  INFORMATIVE  DIAGNOSTICS  (DFEAULI) 

SAME  ftr  Y PLUS  DIAGNOSTICS  INDICATING  NON-ANSI  USAGE 

gemepatf  code  for  cbject-ttmf  reprtevf  of  errors 

(DEFAULT  FDR  T':  AND  OPT  = 0) 

no  NOT  generate  REPPIFVF  code  (DEFAULT  FOR  OPT=l,?) 

LOAD  and  execute  OBJEC-T  CODE  WITHOUT  A SEPARATE  'LCD.*. 

FORTRAN  SOURCE  INPUT  IS  ON  'LEN'  INSTFAO  OF  'INPUT' 

'•AME  ns  T = C0MPILF  (Sef  CC.Rm,  7-?,  7-1) 
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L- LEN 
1.  = 

nt 

OPT  = n 
= ? 

p 

D=  n 

pn  = p 

pn=f: 

pp 

PI.  = N 


DW  = K 

PM 

Q 

9=0 
= 1 
= ? 

= 3 

ROUKD= 

pnuK'n-- 
POtJNT  = 
POUKO 

GL  = 0 

r 

T=  0 
T»: 


OUTPUT  LISTS  (PL,  EL,  OL , 9,  SL ) APE  TO  PE  PUT  ON  EILE 
•l,rN*  PATHEP  THAN  'OUTPUT*. 

ALL  LISTINGS  APE  SUPPPESSFO,  EXCEPT  FATAL  OIAGNOSTICS  ANO 
THE  STATEMENTS  CAUSING  THEM. 

nnjECT  CODE  listing  (USE  ONLY  MHEN  REQUESTFO  3Y  109?) 

EASE  COMPILE  (OFEAULT) 

STANOAPD  OPTIMIZATION  (USE  EOP  PROOUCTION) 

EAST  OPJECT  CODE  (SLOWER  COMPILE)  (NOT  RECOMMENDED) 

(ALSO  SEE  parameters  'Q*  AND  'TS') 

PAGE  NUMPEPING  OF  OUTPUT  LIST  IS  CONTINUOUS  FROM 
SUPPPOGRAM  TO  SUPPPOGPAM. 

EACH  SUBPROGRAM  STARTS  WITH  PAGE  1 (DEFAULT). 

COMPILE  TIME  LISTINGS  APE  0 LINES  PER  INCH 

compile  time  listings  are  G lines  per  inch  (DEEAULT) 

implies  PD=0  (PRINT  OENSITY) 

SPECIFY  decimal  MAXIMUM  NUMPER  OF  UNIT  RECORDS  TO  BE 
written  at  EXECUTION  TIME  ON  THE  FILE  'OUTPUT'  (DEFAULT! 
PL=S0C0).  THE  PRINT  LINE  LIMIT  MAY  PE  RESET  AT  EXECUTION 
TIME  RY  SPECIFYING  PL=NNNNN,  WHERE  NNNNN  IS  THE  NEW  LINE 
LIMIT,  anywhere  on  the  LGO  CARO.  IT  DOES  NOT  AFFECT 
NORMAL  file  name  REPLACEMENT.  (SEE  CCRM,  ?-15) 

PAGE  WTOTH  (NUMBER  OE  CHARACTERS  PER  LINE  IN  COMPILATION 
LISTING.  GO  < N < 13S)  VALID  ONLY  WITH  TS  MODE. 

implies  pw=Z?. 

EAST  COMPILE.  NO  OPJECT  CODE.  NO  ADDRESSES  IN  REFERENCE 
MAP.  NO  EXECUTION  POSSIBLE. 

NO  RFEEPfnCE  MAP 

SHORT  map  (DEFAULT)  (SYMBOLS,  ADDRESSES,  TYPE,  DO  LOOPS) 
LONG  MAP  (SHORT  MAP  PLUS  LINE  NUMBER  REFERENCES) 

LONG  MAP  PLUS  COMMON  BLOCK  MEMBERS  AND  EOUIVALENCE  CLASSES 

:OPS  ROUNDED  ARITHMETIC  FOR  SPECIFIED  OPERATORS  (ANY  OR  ALL  OF 

♦,  *,  /) 

:0  POUNDED  arithmetic  WILL  NOT  3E  USED 

■■*/  default 

implies  round=»-*/ 

DO  NOT  LIST  SOUPCE  PROGRAM 

TURN  ON  ERROR  TRACFBACK  IN  LIBRARY  ROUTINES.  (DEFAULT) 
(FORGED  WHEN  D OR  OPT=0) 

TURN  OFF  ERROR  TRACEBACK. 

(E.G.,  SnUARE  PODT  OF  NEGATIVE  NUMBER  WILL  BE  FLAGGED  AS 
AN  ‘^RPDP,  RUT  WILL  NOT  SHOW  WHERE  THE  ERPOR  OCCURRED.) 

TIHE-SMARING  MDOE.  'OPT'  IGNORED  IE  'TS'  SPECIFIED. 


ALl  FAPAMFTERS  ARE  OPTIONAL 


*ETN.'  WILL  USE  ALL  DEFAULT  PARAMETERS, 
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PROGRAM  CARO  »•* 

THF  FtRCT  9TATCMFNT  OF  A FORTRAN  MAIN  PROGRAM  MUST  BF  A PROGRAM 
CARD  IN  THF  FOLLOWING  FORMAT  (FTN,  7-?;  FTN/S,  I-7-i)l 

RROGRAM  NAMF  «F 1 , F 2 » . . . , F N) 

WHFRF  'NAMF*  IS  THE  NAMF  OF  THE  MAIN  PROGRAM  (FROM  1 TO  7 ALPHANJMtPIC 
CHARACTERS,  BEGINNING  WITH  A LETTER).  THE  PARAMETERS  *FJ'  ARE  T H» 

NAMES  OF  ALL  INPUT/OUTPUT  FILES  REQUIRED  BY  THE  MAIN  PROGRAM  AND  All 
SUBPROGRAMS.  EACH  IS  I TO  6 ALPHANUMERIC  CHARACTERS,  BEGINNING  WITH  A 
LETTER.  NO  MORE  THAN  SO  FILES  HAY  BE  USED. 

IN  THE  DISCUSSION  BELOW,  'E • IS  A FORMAT  NUMBER. 

1.  IE  THE  PROGRAM  HAS  CARD  INPUT,  PUNCHED  CARD  OUTPUT  ANO/OP  LINE 
PRINTER  OUTPUT,  FILE  NAMES  'INPUT',  'PUNCH'  ANO/OR  'OUTPUT', 
RESPECTIVELY,  MUST  APPEAR  IN  THE  LIST. 

THE  pile  name  'TAPEJ*  must  appear  IE  REAOTJ.E),  wRITETJ.F), 

' REACTJ),  WRITP(J),  BUFFER  IN(J,...,  OP  BUFFER  OUT(J,.,.  STATEMENT'  AR- 

USFC.  'J'  IS  AN  INTEGER  FROM  1-99.  IF  *J'  IS  A VARIABLE,  THERE  mj-T 
BE  A FILE  NAME  'TAPEJ*  FOR  EACH  VALUE  *J'  MAY  ASSUME. 

3.  ANY  FILE  NAME  MAY  BE  EQUATED  TO  ANY  OTHER  FILE  NAME  WHICH  PRECEDES 
IT  IN  THE  LIST.  FOR  EXAMPLE,  TE  UNIT  S IS  TO  BE  THE  CARD  READER 

(RE aO(S,E)<LIST>) , then  »TAPES=INPUT*  MUST  APPEAR  IN  THE  LIST  AFTER  THE 
DEFINITION  OF  'INPUT*.  SIMILARLY,  IF  UNI ^ 6 IS  THE  LINE  PRINTER 
(WRITE (6,E)<LIST>) , THEN  • T APE G= OUTPUT ' MUST  APPEAR  IN  THE  LIST  AFTER 
THE  DFFINTIION  of  'OUTPUT*. 

4.  THF  FILE  'OEBUG=OUIPUT'  SHOULD  APPEAR  ON  THF  PROGRAM  CARD  IE  THE 
FORTRAN  DFBUG  OPTION  MIGHT  BE  INVOKED  AND  THE  USER  DESIRES  INTERSPERSED 

r DEBUG  OUTPUT.  OTHERWISE  THE  DEBUG  FILE  WILL  BE  DISPOSED  TO  (HE  PRINTER 

I BY  the  system  RT  END-OF-JOB. 

G.  IF  A FILE  WILL  ALWAYS  RESIDE  ON  DISK  (NEVER  ON  TAPE),  THE  SIANDARD 
I buffer  size  of  si?  tDECIMAL)  may  be  DECREASED,  FORMATTED  FILES  MAY  BE 

[ REDUCED  ro  l?rt  (E.G.,  ' T APE 1S  = 12B ' ) 1 CONNECTED  INTERCOM  FILES  TO  HR T 

BUFFFPFD  RIL^S  to  0,  THIS  IS  ESPECIALLY  USEFUL  IN  INTERCOM  PROGRAMS 
j WHERE  RPACE  MAY  BE  CRITICAL. 

I 

i b.  IF  A T'lL'  -A'  RFSTOF  ON  TAPE,  INCREASING  THE  BUFFER  SIZE  TO  10?4 

(DOUBLE  RUET-F.RING)  SHOOED  I-PPOVE  PUNNING  TIME. 


T.  THE  DFEAUL'  MAXIMUM  LENGTH  EQP  FOPMATTEO,  L I S T - DI PEC T ED  ANU 
NAMELIST  PPPOROS  IS  ISO.  THIS  mRY  BE  CHANGED  BY  INCLUDING  A NEW 
MAXIMUM  L-NGTH  AFTER  THF  FILE  NAME  (E.G.,  'TAPE1=/20Q'  OR 

'T  APF?F  = 1 'ZH/GO  •)  . 

fl.  AT  EXRCUTTON  tjmp,  file  NAMES  MAY  BE  REPLACED  IN  THE  ORDER  IN  WHICH 
THEY  APPEAR  IN  THF  droOPAM  CARO.  EQUATED  FILES  SHOULD  APPEAR  AET''P 
OTHER  FTLE  definitions,  SINCE  THE Y MAY  NOT  BE  RFREACED.  (CCRM,  10-13) 


examples  - PROGRAM  CAT  ( I NPUT , OUT "U T , T A RE  1 S , T A P EG  = I NP U T , T APE  6 - 0 J 'PU T ) 
PPOGRAM  TERM  ( I NPU  T=  1 2 S , Oil  TPUT  = 1 7 , T APE  1 T , ' A P t G r I N Pf  T ) 
PROGRAM  CHT'CT  ( OUTPUT  = 12  B,1  APEl  =1  2 «/?  0 n,  1 A ”'  /Gfi  ) 
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POGE 


1 . 

?. 

PP 

PU 

nj 

TH 

0 

';o 

4. 


EO 

«L 

E. 

MU 

MS 

GT 

h. 

PP 

(% 


•*»  COVVERSION  TO  FORTRAN  EXTENOEO  **• 

acn  THE  'PROGRaM*  STATEMENT  WITH  ALL  FILE  NAMES  LISTED. 

COMPILE  IMF  PROGRAM  WITH  DEFAULT  *OPT=0'  UNTIL  IT  IS  ERROR-FREE. 
OnuCTION  PROGRAMS  SHOULD  BE  COMPILED  WITH  •OPT=l'. 

nVISION  BY  7FRD  DOFS  NOT  YIELD  A ZERO  AS  SOME  OTHER  COMPUTERS  DO, 

T USING  THE  RESULT  WILL  CAUSE  A HALT  IN  EXECUTION.  THE  BUILT-IN 
notion  •LEGVARIV)*  will  TEST  FOR  INFINITE  AND  INDEFINITE  OJANTITIES. 

F FUNCTION  HILL  RETURN  -1  FOP  AN  INDEFINITE,  ♦I  FOR  AN  INFINITE,  AND 
FOR  normal.  user  may  also  test  for  THE  DIVISOR  EQUAL  TO  ZERO  AND,  IF 
, SET  Thp  RESULT  TO  ZERO,  IF  DESIRED.  (FTN,  «-lS;  FTN/5,  I-»I-1G) 

aLTFR  ANY  USE  OF  THE  FOLLOWING  MACHINE-DEPENDENT  FEATURESJ 
IBM  ZOBO  IBM  SZ360  CDS  6G00 


IB  BTTSZWORD  IZ  BITS/WORD 

17  octal  DIG/WOPO  fl  HEXADECIMAL  DIG/WORD 

6 CHAR/WORD  4 CHAR/WORD 


60  BITS/WORD 
?0  OCTAL  DIG/WORO 
10  CHAR/WORD 


RMATS  OF  a«  OR  LESS  NEED  NOT  BE  CHANGED  IF  THEY  CONSTITUTE 
PHANUMERIC  INFORMATION  FOR  PURPOSES  OF  PRINTING  ONLY. 


specification  statements  (DIMENSION,  EQUIVALENCE,  COMMON  ANC  TYPE) 
ST  APPEAR  BEFORE  DATA,  ARITHMETIC  STATEMENT  FUNCTION  DEEINITICN  AND 
MFLtST  STATFmENTS,  WHICH  IN  TURN  MUST  COME  BEFORE  ANY  EXECUTABLE 
ATEMFNT . 


DOUBLE  PRECISION  IBM  S/160  PROGRAMS  MAY  BE  CONVERTED  TO  SINGLE 
FCISION  FOR  COG  6000  SERIES  WITH  A SN030L  PROGRAM  IN  FILE  CVT360 
EE  CCRM,  10-21).  EBCDIC  CARDS  MAY  BE  USED  DIRECTLY  (SEE  CCRM,  1-6). 


JUNE  1977 


PAGE  4-5 


***  PITFALLS  IN  FORTRAN 

KUMBPRS  IN  PARENTHESES  REFER  TO  THE  PAGE  IN  FTN  MANUALS  <NOS/BE 
MANUAL  FIRST  / SCOPE  MANUAL  SFCONO) . 

1.  CCTAL  CONSTANTS  USEO  IN  DATA  STATEMENTS  SHOULD  NOT  BE  PRECEDED  BY 
THE  LETTER  0 BUT  SHOULD  BE  FOLLOWED  BY  THE  LETTER  B.  <l-a/I-2-5» 

THE  letter  0 is  a valid  format  specification  (E.G.,  O?0  MAY  be  used  to 

WRITE  CUT  A 60-BIT  WORD  IN  OCTAL). 

?.  DOUBLE  PRECISION  CONSTANTS  ARE  DEFINED  BY  THE  D EXPONENT.  CUE  TO 
THE  4B-BIT  COEFFICIENT  IN  CDC  6000  SINGLE  PRECISION,  FEW  OPERATIONS 
RECUIRF  double  PRECISION. 

I.  SOME  INTEGER  MULTIPLICATION  AND  DIVISION  IS  DONE  IN  FLOATING  POINT 
MODE.  HFNCE,  SHIFTING  DATA  IN  FORTRAN  BY  MULTIPLYING  OR  DIVIDING  BY 
POWFPS  OF  TWO  WILL  NOT  ALWAYS  WORK.  A FORTRAN  BUILT-IN  FUNCTION 
•SHIFT(A,I)»  WILL  PERFORM  THIS  OPERATION.  THE  FUNCTION  WILL  SHIFT  'A* 
•I*  BITS  left  circular  IF  IS  POSITIVE?  *1*  BITS  RIGHT  WITH  SIGN 

EXTENSION  AND  FNO-OFF  IF  *1*  IS  NEGATIVE. 

4.  MIXED-MDDF  EXPRESSIONS  (E.G.,  A=B+2)  ARE  ALLOWED  AND  NO  ERROR 
DIAGNOSTIC  WILL  RESULT.  HOWEVER,  THIS  IS  NOT  STANDARD  FORTRAN  AND 
SHOULD  BE  AVOIDED. 

5.  HOLLERITH  STRINGS  IN  FORMAT  STATEMENTS  MAY  BE  DELIMITED  BY 

DOL'PLE  QUOTES  (4-8  PUNCH  026?  7-8  PUNCH  029)  OR  ASTERISKS  OR  DEFINED  BY 
HOLLERITH  COUNT  (USING  H) . IN  DATA  OR  ARGUMENT  LISTS,  ONLY  HOLLERITH 
COUNT  OR  DOUBLE  QUOTES  MftY  BE  USED. 

6.  ON  THE  CDC  6800,  THERE  IS  NO  WAY  TO  EXPLICITLY  DEFINE  THE  LENGTH  OF 
A variable.  (F.G.,  'REAL’S  MASS'  MUST  BE  CHANGED  TO  'REAL  MASS'  OR 
'DOUBLE  PRECISION  MASS'.) 

7.  A variable  NAME  WITHIN  A SUBROUTINE  CANNOT  BE  THE  SAME  AS  THE 
SUBROUTINE  NAME.  (7-7/1-7-13) 

8.  DUMMY  ARGUMENTS  OF  A SUBROUTINE  MAY  NOT  APPEAR  IN  A COMMON,  DATA  OR 
EQUIVALENCE  STATEMENT  IN  THE  SUBROUTINE.  ( 7- 1 2 /I - 7-1 2 ) 

9.  ALL  ARGUMENTS  TO  SUBROUTINE  OR  FUNCTION  SUBPROGRAMS  ARE  TRANSFERRED 
BY  location  (NAME)  ON  THE  CDC  6008  (EXCEPT  FOR  LIBRARY  ROUTINES,  WHICH 
WILL  HAVE  VALUES  TRANSMITTED  BY  VALUE  UNLESS  T,  D OR  OPT=0  IS  INVOKED 
BY  THE  FTN  CONTROL  CAPO  OR  THE  EXTERNAL  FUNCTION  NAME  APPEARS  IN  AN 
EXTPRNAL  STATEMENT  IN  THE  CALLING  PROGRAM).  SLASHES  USEO  IN  IBM  S/36Q 
SUPRCUTINFS  to  pass  undimensioned  ARGUMENTS  BY  NAME  MUST  BE  REMOVED. 


Pft&F  U-h 


r 
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10.  FTN  f.  FNTPY  POINTS  flPE  HANOIED  DIFFERENTLY  FROM  OTHER  FORTRAN 
IMPLFMPNTATIONS.  the  APGUHENT  list,  if  any,  appearing  WITH  THE 
FUNfTION  DR  SUBROUTINE  STATEMENT  OOFS  NOT  APPEAR  WITH  THE  ENTRY 
STATEMENT  OUT  IS  ASSUMED  TO  BE  THE  SAME.  IN  THE  CALLING  PPQGRAM,  THE 
RFFFRENCE  TO  THE  ENTRY  NAME  INCLUDES  THE  ARGUMENT  LIST.  IN  A MULTIPLE 
ENTRY  FUNCTION,  REFEpFNCE  IS  ALWAYS  TO  THE  FUNCTION  NAME,  RATHER  THAN 
THE  entry  name  . NOTE  THAT  ALL  SPECIFICATION  STATEMENTS 

MUST  PRECEDE  ALL  EXECUTABLE  STATEMENTS,  HENCE  NO  SPECIFICATIONS  HAY 
FOLLDW  AN  ENTRY  “OINT.  FOP  EXAMPLE,  CALLS  IN  THE  MAIN  ROUTINE 
MIGHT  °F  AS  FOLLOWSI 


L = JOE(3.*P,0) 


K = JAM(R,A) 


WHERE  THR  SUPOROGRAM  IS  FOLLOWS 

FUNCTION  JOF(X,Y) 


JOF  = Y-X 
RETURN 
ENTRY  JAM 


JOE  = X-Y 

RETURN 

END 

NOTE  THAT  FTN  VERSION  5 (THE  ANSI  PROPOSED  STANDARDI  WILL  IMPLEMENT 
THIS  DIFFERENTLY. 

11.  FTN  4 multiple  RETURNS  FROM  SUBPROGRAMS  ARE  IMPLEMENTED  DIFFERENTLY 
FROM  other  fortran  COMPILERS  AS  THE  FOLLOWING  EXAMPLE  SHOWS. 

( 7-E/I-7-14) 


CALL  PGMl  <A,B,C»,  RETURNS  (5,6) 


5 D=A*C 


E DO  10  1=1, ?5 


WHERE  THR  SUBROUTINE  IS 

subroutine  PGMl  (X,Y,7),  RETURNS  (M,N) 


RETURN  M 


RETURN  N 


RETURN 

END 

NOTE  THAT  FTN  VERSION  5 (THE  ANSI  PROPOSED  STANDARD)  WILL  IMPLEMENT 
THIS  differently. 

12.  MISSING  SUBPROGRAMS  DO  NOT  INHIBIT  EXECUTION  OF  A SIMPLE  OR  OVERLAY 
PROGRAM.  IF  A MISSING  ROUTINE  IS  ACTUALLY  CALLED,  THE  RUN  WILL  ABORT 
WITH  A OAYFIlE  message  ‘ERROR  MOOR  1,  LOCATION  4XXXXX*  (XXXXX  IS  THE 
ADDRESS  WHRRE  THE  MISSING  ROUTINE  WAS  CALLED.  UNSATISFIED  REFERENCES 
WILL  BE  LISTED  IN  THE  STORAGE  MAP. 
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13.  OF  THF  S/3G0  AND  TPM  7 090  RUILT-IN  FUNCTIONS  A9E  NOT  NAMED 

THF  SAME  OP  APF  non-existent  ON  THP  CDC  6000  LIPPAPY.  THOSE  MISSING 
FPOM  THF  LIPPAPY  MAY  PE  OPTAINEO  FROM  CODE  1R92.  (CHAP  ft/CHAP  1-8) 


7 09  0 

360 

60  00 

USF 

ASTN 

APSTN 

ASIN 

ACOS 

APCOS 

ACOS 

COTAN 

COTAN 

EPF 

ERF 

FRF 

gamma 

gamma 

GAMMA 

ALGAM A 
T IMER 

A L G A M A 

SECOND 

(CPU  TIME) 

T TMEP 

CLOCK 

(SAME  AS  SECOND) 

TIME 

(CLOCK  TIME  - HH.MM.SS.) 

LOC 

LOCF 

(ADDRESS  OF  ARGUMENT) 

PANE 

(RANDOM  NUMBER) 

14.  APPAYS  MAY  have  ONE,  TWO  OR  THREE  SUPSCPIPTS.  VARIABLES  IN 
SUPSFPTPTS  OE  THREE  DTMFNSIONS  CAUSE  SLOWER  EXECUTION,  ESPECIALLY  IN 
nnUPLP  PPECISTON  OP  COMPLEX  ARRAYS. 

15.  overflow  and  niVTOE  CHFCK  TESTS  APE  NON-EXISTENT  ON  THF  COC  6000. 
USE  TH*^  'LFGVAP*  function  to  test  EOP  these  situations.  (8-14/1-8-15) 

IF.  WHFN  A COMPUTFD  on  TO  COUNTER  IS  OUTSIDE  THr  RANGE,  6000  FORTRAN 
EXTFKPPn  WILL  ADOPT  THF  RUN.  THF  COUNTER  MAY  RE  ANY  EXPRESSION  RUT 
WILL  RE  TRUNCATED  TO  AN  INTEGER  AFTER  EVALUATION  AND  REFOPE  THE  TEST. 

17.  rO  LOOPS  CANNOT  TERMINATE  WITH  AN  'IF'  STATEMENT.  (4-8/I-5-8) 

18.  TWO-RPANCm  arithmetic  and  logical  *IF'  STATEMENTS  APE  AVAILABLE  IN 
CDC  FCPTPAN  FXTrNiDED.  (4-6,  8/I-5-6,  8) 

19.  FNCOUNTFPTNG  AN  END-OF-FILF  WILL  NOT  TFRMINATF  A JOB  UNTIL  AN 
attempt  TS  MAOF  to  pFAD  beyond  THF  FOE.  THE  FIRST  VARIABLE  TO  BE  READ 
IN  TPr  r;uPPrNr  UNIT  RECOPn  WHEN  AN  EOF  HAS  BEEN  ENCOUNTERED  WILL  BE  SET 
TO  -7^PC,  OTHcos  A'^E  UNCHANGED.  THE  FUNCTION  'EOF(N)'  MAY  BE  USED  IN 
AN  'IF'  TEST  TO  S«^NSE  AN  EOF  ON  TAPEN.  AETrp  TESTING,  PEAOING  THE  NEXT 
FILE  I';  allowed.  THF  function  'IOCHEC(I)'  “AY  BE  USED  TO  CHECK  FOR 
PEAOTNG  ppOUNpANCIPS.  THPSE  FUNCTIONS  REPLACE  THE  'ENO='  AND  'ERR=' 
pAPAMFTfps  TN  THF  TPM  S/T60  REAP  STATEMENT,  WHICH  APE  NOT  AVAILABLE. 

( P-97/T-8-19)  'fnd='  and  'FRP='  ape  A PART  OF  THF  PPOPOSFO  ANSI 
EOPTPAN  77  STANOAPO. 

70.  ATTFMFT  to  print  numbers  INVALID  FQP  THE  FORMAT  FIELD  WILL  CAUSE 
ONF  CF  THF  following  oFSULTSt 

’ IN  THE  FNTTPF  field  IF  THE  NUMPEP  TS  TOO  LARGE  FOR  THE 

eiflo. 

P IF  VAIUF  TS  TNFTNTTE  (RANGE  ERhoR) 

T IF  vALIIf  TS  TNOFEINTTF 

(6-«,  °/T-n-p,  IT) 
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71.  THF  FrPMflT  SDFCTFiCflTION  'T'  FOP  TARULfiP  COLUMN  S PF C I F I C ft T I CN  IS 
ftVBILft"LF  ON  IHF  ror  Fono. 

77.  Kft^FLIST  OATS  ON  THF  COO  FOOD  IS  THE  SAME  flS  ON  THE  I3M  709C.  IOm 
S/‘'F0  namelist  data  must  RF  changed  to  'NCLOSE  each  STRING  IN  DCLLBP 
SIGNS  (F.G.,  TNBM1...S). 

REFOP«ATTING  IN  COPF  IS  POSSIRLF  RY  MEANS  OE  'FNCOOF*  AND  •DECODE' 

statements.  this  method  is  slow.  (S-12/1-9-1?) 

RU.  FOPMATTEo  OP  namelist  INPUT  AND  OUTPUT  HAS  A DEFAULT  LIMIT  OF  ISO 
CHAPACTEPS  PEP  UNIT  REOOPD.  PPINTFP  OUTPUT  GREATER  THAN  1T7  CHARACTERS 
TS  PPTNTFD  ON  7 LINES.  THE  STZF  MAY  PE  ALTERED  IN  THE  PROGRAM  CAPO 
(F.G.,  •TAPEl  = /i»0Q,TAPE?=7l?l  •)  ( / T- 7-2  I OR  DIRECT  CALLS  TO 

PFCCRD  manager  may  RF  USED  ( S - 39 / 1 1 1 -6 ) I OR  'PUFFER  IN',  'PUFFER  OUT', 
•DECCOE'  AND  'ENCODE'  STATEMENTS  MAY  BE  USED,  ALONG  WITH  'UNIT'  AND 
•LENGTH'  functions  ( P-2  3/ I -9- 1 3 , 1 «♦ , I-a-lP,19),  TO  PERFORM  FORMATTED 
I/O  FOR  RECORDS  IN  EXCESS  OF  THE  LIMITATIONS  SPECIFIED  ABOVE. 

25.  RANDOM  ACCESS  TO  DATA  ON  MASS  STORAGE  IS  ACCOMPLISHED  BY  CALLABLE 

SYSTEM  ROUTINES  (F.G.,  pEADMS).  ( A - 2« / I- 8-1 4 , III-7-1)  SINCF  SUCH 

RANCCM  DATA  IS  NOT  BUFFERED  AHEAD,  IT  IS  SLOW.  'OPFNMS'  IS  CALLED  TO 
OPEN  THF  RANDOM  FILE  AND  SF T UP  THE  INDEX  POINTERS.  THE  USER  MUST  NOT 
ZERO  THE  INDEX  ARRAY  AFTER  OPFNMS.  'CLOSMS'  MAY  RE  CALLED  TO  CLOSE  THE 
FILE,  PUT  IT  IS  NOT  REQUIRED.  BLOCK  AS  WELL  AS  INDEX  LENGTH  SHOULD  BE 

ft  POWER  OF  2 FOR  SPEED. 

26.  ENrODFZDFCODE  PUFFER  SIZE  IS  pESTRICTED  TO  150  CHARACTERS  OR  LESS. 
MULTTPLP  ENCODF/DFCODF  STATEMENTS  ARE  REQUIRED  FOR  BUFFERS  GREATER  THAN 
15C  CHARACTERS. 

27.  THE  MAIN  CARRIAGE  CONTROL  CHARACTERS  AND  THFIR  ACTIONS  BREt 


CHAPAETEP  ACTION  BEFORE  PRINTING 


IBLBNK1 

♦ 

0 (ZERO) 

- (MINUS) 

7 


EJECT  TO  TOP  OF  NEW  PAGF 
SPACE  1 


NO  SPACE 
SPACF  2 
SPACE  3 


(1  BLANK  LINE) 
(2  BLANK  LINES) 


SKIP  TO  LAST  LINE  ON  PAGE 


(NOT  ON  200UT  TERMINALS) 
(NOT  ON  200UT  TERMINALS) 


WHIN  0,  R,  S OR  T IS  USED  AS  CARRIAGE  CONTROL,  NO  PRINTING  TAKES  PLACE. 
THF  remainder  DE  the  line  HILL  PE  IGNORED.  (6-31/1-10-32;  CCRM,  14-4; 
NOSPE,  3-48!  SCOPE,  APPENDIX  F-2) 

'PM'  MAY  PE  USED  IN  COLUMNS  1-2  OF  BN  OUTPUT  PRINT  LINE  FOR  DISPOSITION 
OF  REMOTE  files.  (SEE  CCRM,  14-3) 


7«.  CURRENT  CORE  PUFEFrs  foR  WRITTEN  FILES  NOT  EQUATED  TO  'OUTPUT'  ARE 
NOT  FLUSHED  (Emptieo)  TO  THF  FILE  IF  A JOB  A80R1S.  THUS,.  LINES  OF  DATA 
MAY  PE  LO'-T.  'OECOVR'  ( 8- 1 2/ T- 8- 1 3 1 CCRM,  4-16;  NOSBF,  6-22:  SCOPE, 
7-28)  MAY  pr  USED, 
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?9.  IF  MnoF  THflM  ONF  9LnC<  06TA  SUBPROGPAI  IS  USED,  EACH  MUST  HAVE  A 

NAMF  ( , 

TO.  WHFN  COMPASS  POUTTNFS  APE  INTERMIXED  IN  EDPTRAN  CODE,  THE  MINIMUM 
EIELP  LENGTH  PEO!JIPEn  IS  S'^QOO  TO  ALLOW  EOP  USE  OE  COMPASS  PSEUDO-OPS. 

Tl.  IF  THE  PRIMARY  fnTRY  NAME  OF  A MULTIPLE  ENTRY  SYSTEM  LIBRARY 
ROUTINF  IS  REPLACED  BY  A ROUTINE  OF  THE  SAME  NAME  IN  USER'S  PROGRAM 
(SUCH  AS  XAYISV  IN  THF  SCAOPO  PACKAGE),  ALL  SECONDARY  ENTRIES  (IE 

rfffrenped)  must  Fif  replaced  also,  unsatisfied  externals  will  result 

OTHERWISE. 

TP.  IF  OBJECT  EIL*^  (LGO)  HAS  BEEN  CATALOGED,  EVEN  THOUGH  SOME  FORTRAN 
SUPFPOGRAMS  DTD  NOT  COMPILE  CORRFCTLY,  'COPYL*  (CCRM,  6-2)  MAY  BE  USED 
TO  PFPLACE  THF  RAO  COMPILATIONS  EPOM  A NEW  OBJECT  SUBFILE.  IE  THE  PAD 
ROUTINF  WAS  A MAIN  PROGRAM  IN  AN  OVERLAY  JOB,  THE  OVERLAY  CARD  MUST  BE 
INFERTFO  BY  'rooYN'  (CCRM,  6-3).  WHEN  AN  OVERLAY  CARO  IS  BEING  COPIED, 
BEF-TK  IN  column  1 AS  ANY  OTHER  MOS/BE  CONTROL  CARD. 

IF.  rOMMFNT  CAROS  SHOULD  NOT  OCCUR  FOLLOWING  THE  LAST  END  CARD.  THE 
COmftlfp  will  print  THF  NON-FATAL  OAYEILE  MESSAGE  'NULL  PROGRAM  IGNORED 
AETFP  X...Y*,  WHFRF  X...Y  IS  THF  NAME  OE  THF  LAST  ROUTINE. 
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*»•  K0(?rPAN  TV  FXTFNnEO  - VF^SION  4 »*» 

niFF'^Pr-^f^F''  nFTWTFN  FOPLICP  I MPL  FUF  NT  ft  T I ONS  OF  FORTRAN  AND  COC 
FnPTPAN  TV  PVT'^NOfn,  VERSION  4,  APRS 

1.  FTN  (-rMPTL'^n  PPOr.PAMS  HflVF  LTNF  LIMIT  ON  FILE  'OUTPUT*  AT  EXECUTION 
TI«F.  ON  Tmt-  fT:<  nP  LGO  CAPO,  AOO  PAPAMETFR  'PL  = NNNNN*  TO  SET  DECIMAL 
LTNF  LT«xt  up  fiP  DOWN  FROM  THE  DEFAULT  SOOC  LINES.  (FTN,  10-6;  FTN/S, 
I-  1 1-6> 

?,  TMriTrxT  STftU**fn  Al.LOWS  ALL  VAPIAOI,  ES  REGINNING  WiTt-  S’ATFO 
LTTTFP  to  dp  CIVFN  the  same  TYPE.  FOP  EXAMPLE,  'IMPLICIT  INTEGER  (F»' 
WOULE  MAXP  ALL  'F*  VftPTftDLEP  (SUCH  AS  F,  RIO,  FAR)  DE  INTEGERS. 

(FTN,  T-i;  FTN/D,  T-6-3) 

T.  'WRITMS'  HAS  TWO  ADDITIONAL  OPTIONAL  PARAMETERS.  THE  DTNSRDC  SCOPE 
?.,T  PPPAIILT  OF  RFWPTTF  TN  Pl.ACF  WHFPP  SPACF  IS  AVAILADLE  IS  NOT  THf 
NO'^/PF  DEFAULT.  TO  USE  THI^  MOPE  FFFICTENT  RFWPITF,  THE  USER  MUST 
'CALL  WP1  TMS  U),F ,N,K , -1 ) ' . IF  THF  -1  PARAMETER  IS  OMITTED,  ALL 
pFWPTTES  will  go  AT  THF  END  OF  THF  FILE,  (FTN,  «-30;  FTN/S,  III-7-?) 

4.  LT^'I-DTofCTFO  T/0  TS  AN  ADDED  FEATURE  OF  SCOPE  3.4.  IT  REPLACES 
THF  TrPMTM  routine  AND  IS  MDPE  FLEXIBLE.  FOP  THE  FPEE-FORMAT  I/O,  AN 
AFTFPTSK  REPLACES  THE  FORMAT  NUMBER  TN  READ,  WRITE  OR  PRINT.  INPUT 
DATA  CPMSTSTS  nr  comma  separated  VALUES.  ALPHA NJMT RIC  FIELDS  MUST  BE 
FNELCSFO  IN  DOUBLF-OUOTF  (4-R)  PUNCHFS.  (FTN,  6- « 1 FTN/S,  1-9-7) 

5.  HOLLFRTTH  STRINGS  AND  EXPRESSIONS  MAY  OCCUR  IN  OUTPUT  LISTS. 

(FTK,  G-?6t  FTN/S,  T-9-11,  T-10-1) 

F,  . 'MrvLEV'  WILL  MOVE  WHOLE  ARRAYS  FROM  ONE  AREA  TO  ANOTH-R  WITHOUT 
CONVERSION  (E.G.,  TALL  MOVLFV  ( H EP  E , HER  E , j o 0 ) ’ ) . NOTES  BECAUSE  FATA 
T<?  MOVED  7 WORDS  AT  A TIME,  'HERE'  AND  'THERE'  MUST  RE  PHYSICAL!  Y 
SEPARATED  BY  AT  LEAST  ONE  WORD  OF  CORE  (I.E.,  WHEN  'HERE'  TS  A(l), 
.there*  may  not  DF  A(7)).  IE  THE  NUMBER  OF  WORDS  TO  MOVE  IS  ODD,  THE 
LAet  MPVE  TS  ONLY  ONE  WORD.  (FTN,  8-?6 : FTN/S,  I-R-11) 

7.  WHEN  'BUFFER  TN'  IS  USED  TO  READ  STRANGER  TAPES,  EUNC’^TON  'LENGTH' 

MAY  or  RFPl.ftCEO  BY  A THPF  E- ARGUME  N T SUBPOUTTNF  'LENr.THX'.  ALLOWING  THf 
USER  TT  TMErK  FOR  OTHER  COMPUTER  Si  iTEM  WORD  ST7ES.  (ETN,  8-D4;  etn/S, 
I-  *>  ’9) 

8.  THEpr  less  AOVANTAGE  TN  HAVING  BLANK  COMMON  TN  PROu  ‘‘'S,  SINCE 

THF  inrOER  TS  TN  LOW  CORE  ANO  CANNOT  BE  OVERLAID  BY  ANY  COMMON  BLOCF'S. 
srrMFN’'“D  jonc  CANNOT  BOUNCE  COPE  WHEN  BLANK  COmmdn  TS  USE*'. 

AP'-i'cilTE  PR 'ICR  A mb  ARE  KEPT  IN  A LTBRAPX,  BLANK  COMMON  CAN  BE  USED  to 
o(  DLTE  the  ohYSTEAL  ST7F  (NUMBER  OF  RRUS)  OF  THE  ABSOLUTE  MODULE. 

D.  EORTRAN  callable  'SKPEIL'  may  be  used  to  skip  on  tape  (EITHER 
SY  TEm  dtAMDARD  OF  STRANGER)  OR  DISK,  DTeRepent  ARGUMENT  lISTS  API 
•lEEcrri  Tq  i-fc-Tf,  rnRWAPD  QP  FiACKHARO,  LOGICAL  RECORDS  DR  FILES. 

(I  r CM,  (,-IF,) 

1C.  'TGMFNTATTON  using  SFGMFNT  cards  in  fin  does  not  EXISr  IN  NCS/BF. 
'SEr.LDAD',  IMPLEMENTED  IN  SCOPE  3.4,  DLOSELY  RESEMBLES  OVERLAY  ON  THE 
IBM  S/D60.  (DERM,  ?-lB) 
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11.  FTN  BINARY  BLOCKFO  FILES  CREATEO  UNDER  SCOPE  3.3  MUST  BE  CONVERTED 
USING  THE  'RBTOGRM*  UTILITY  (SEE  CONV) . THE  DEFAULT  PECORD  FOR  BBTOGPM 
IS  NOT  THE  DEFAULT  FOR  FTN  U.6,  HOWEVER.  • BBTOGRH, INF I L E , OU TF I L . ' 
CREATES  C-TYPE  BLOCKS.  TO  USE  THE  RESULTING  'OUTFIL',  INSERT  BEFORE 
THE  *LGO*  AT  EXECUTION  TIHE« 

FILE(OUTFIL,BT=C,RT=W» 

LDSET(FILES=OUTFIU 

•BBTC6RM( INFILE, OUTFIL, 1, I) • HILL  CREATE  FTN  DEFAULT  I-TYPE  BLOCKS. 

FOR  THFSE,  AT  LEAST  SI?  WORDS  MUST  BE  IN  THE  FILE  BUFFER.  NO  'FILE*  OR 
•LDSFT'  CAROS  ARE  REQUIRED. 

1?.  SEQUENTIAL  UNBLOCKED  BINARY  FILES  WRITTEN  BY  FTN  T.O  USING 
•CALL  FTNBIN'  HAY  BE  PROCESSED  BY  INSERTING 
FILE (DATA, BT=C, RT=S) 

LOSET (FILFS=DATA) 

BEFORE  THE  *LGO*,  WHERE  ‘DATA*  IS  THE  LFN  FOP  THE  FILE  AS  IT  APPEARS  ON 
THE  PROGRAM  CARO.  ANY  FILES  WRITTEN  BY  FTN  4.0  WHICH  ARE  TO  BE  USED  BY 
FTN  3.0  PROGRAMS  MUST  HAVE  THE  SAME  CARDS. 

13.  FTN  BINARY  (UNFORMATTED)  FILES  MAY  NOT  SET  BUFFER  SIZE  ON  THE 
PROGRAM  CAPO  BELOW  51?  WORDS  UNLESS  SPECIAL  FILE  TYPE  ABOVE.  IF  IT  IS 
NECESSARY  TO  USE  SMALLER  BUFFERS  FOR  INTERCOM  FL  LIMITATIONS,  THF 
FOLLCHING  CONTROL  CARDS  WILL  BE  REOUIREDi 

FILE(TAPENN,RT=S,BT=C) 

XFO,LDSET=FILES=TAPENN,LOAO=LGO 

14.  FORTRAN  READS  AND  WRITES  UTILIZE  RECORD  MANAGER  TO  FPOCESS  ALL  I/O 
RECUESTS.  the  USER  MAY  BYPASS  FORTRAN  I/O  PROCESSING  AND  CALL  RECORD 
MANAGER  ROUTINES  DIRECTLY  USING  'CALL  GET'  AND  'CALL  PU1'.  IN 
ADDITION,  THERE  ARE  ROUTINES  FOP  FILE  DEFINITION,  OPEN,  CLOSE,  RE'^TMO, 
FORWARD  SPACE,  BACKSPACE.  THESE  ROUTINES  ALLOW  THE  USER  TO  PROCESS 
FILES  WHICH  ARE  NOT  IN  ONE  OF  THE  3 STANDARD  FORTRAN  TYPES.  (FTN, 

b-3b;  ftn/s,  chapter  iii-g;  ftnrm) 

15.  TO  RUN  ANY  SCOPE  3.3  BINARY  OBJECT  PROGRAM  ON  NOS/BE  1.0  (NOT 
INVOLVING  TSKLOAO,  PRELOAD,  OR  ANY  SPECIAL  DEVICE  LIB’^ARIES  SUCH  AS 
SC40?0  OR  CALCOMP),  PRECEDE  THE  PROGRAM  CALL  CAPO  BY 

ATTACH, SYSMISC. 

LOSET (LIB  = SYSMISC/SYSIO)  OR  L I BR A RY ( S YS MI SC , S Y$ I 0 ) 

EXAHPLEt  JOBCARD 

CHARGE  CARD 

VSN,BTN ARY=CAqqgB.  (OPTIONAL) 

LABEL ,BTNAR Y,L=XXXX, P,n=HY, 7, VSN=CA9qqq,NnR ING. 

ATTACH, SYSMISC. 

LIBRARY(SYSMISC,SYSTO)  OR  L DSE T ( L I B'S YS m ISC /5 Y S 1 0 I 

binary. 

' 7/«/q  FOR 

(DATA) 

” 5/7/A/9 


FOF 
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16.  SCOPE  1.3  OnJFCT  MODULES  may  NOT  BF  MIXED  WITH  SCOPE  3.4  AND/OP 
NOS/EE  MnnULFS  IM  A SINGLE  PROGRAM.  WHEN  ANY  PART  OF  THF  PROGRAM  IS 
RFCO^'DTLF^,  EITHER  THE  ENTIRE  PROGRAM  MUST  BE  RECOMPILED  IN  NOS/BE  AND 
THE  SPECIAL  LDSET  ELIMINATED  OR  ELSE  THE  SCOPE  ^.3  VERSION  OF  THE 
PROPER  COMPILER  MUST  RE  ATTACHED  FROM  PERMANENT  FILE.  (E.G., 
ATTACH,ETK,FTN3P0LVL340,ID=CSVS.) 

17.  SOPT/MFRGR  may  be  EXECUTED  DIRECTLY  FROM  A FORTRAN  PROGRAM  (FTN, 
<^-44:  FTN/S,  CHAPTER  III-16).  NOTE  THAT  AN  'REL*  CARD  IS  REQUIRED  FOR 
EXECUTION. 

A PROGRAM  WHICH  DYNAMICALLY  ALLOCATES  CORE  (INSTEAD  OF  AN  RFL  CARO) 
MUST  INSURE  THAT  BLANK  COMMON  IS  OPEINED  LARGE  ENOUGH  TO  HOLD  ALL 
REGUIRFD  DATA  SINCE  SORT/MEPGE  USES  ADDITIONAL  CORE  BEGINNING  AT  LWA+1 
(SEE  LOAD  MAP) . 

1«.  BEGINNING  AT  LEVEL  401,  RE ADMS/ WRI TMS  FILES  ARE  OF  TYPE  BT=I,  RT=U 
AND  WILL  PROCESS  EASTER.  TO  USE  RE ADMS  FILES  CATALOGED  PRIOR  TO  LEVEL 
401,  'FILE*  AND  'LDSET*  CARDS  MUST  BE  SUPPLIED.  FOR  EXAMPLE, 
EILE,LFN,BT=I ,RT=W. 

LDSET, EILES=LEN. 

SCOPE  3.3  RFAOMS/WRITMS  FILES  APE  CONVERTED  BY  UTILITY  RANCONV  (CONV, 
CHAPTER  0)  TO  BT=I,  RT=W. 

IF  A REAOMS  PERMANENT  FILE  IS  MODIEIED,  AN  'EXTEND'  CONTROL  CARD 
MUST  PE  GIVEN. 

19.  when  'FTN.ER'  is  used,  object  code  HILL  INCLUDE  AN  EXTRA 
INSTRUCTION  FOR  EACH  STATEMENT  FOR  USE  BY  REPRIEVE,  IE  JOB  ABORTS. 

20.  ALL  ARITHMETIC  STATEMENT  FUNCTIONS  AND  INTRINSIC  FUNCTIONS  ARE 
TN-LINF  CODE,  HHFTHER  TRACE  IS  ON  OR  OFF. 
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•»*  TIMf-SHAOTNG  FORTRAN  »** 

TIPE-SHARTNG  MODE  FORTRAN  (TG  ON  CONTROL  CARD,  SEE  CORN,  l^-^)  IS  A 
ONE-PASS  COMPILER.  RECAUSE  FEWER  OTSK  ACCESSES  ARE  REQUIRED, 
COMPILATION  IS  FASTER  THAN  IN  OPTIMIZING  MODE  (OPT=0,  1,  2).  OBJECT 
CODE  TS  NOT  HIGHLY  OPTIMIZED  AND  FXECUTFS  ABOUT  AS  EAST  AS  OPT=0  CODE. 
FTN,TS  prouiRi^S  CM40000  MINIMUM. 

IN  ADOITION,  TS  FORTRAN  WILL  ACCEPT  SOME  KEYWORD  MISSPELLINGS  AND 
PUKCTUATICN  ERRORS.  WARNING  DIAGNOSTICS  WILL  BE  ISSUED  SINCE  SUCH 
ERRCRS  may  PF  FATAL  IN  OPTIMIZING  MODE. 

riAGNOSTIC  MESSAGES  APE  LISTEO  AFTER  THE  LINE  WHERE  THE  ERROR  WAS 
detected.  (OPTIMIZING  fodTOAN  GROUPS  THE”  AFTER  THE  COMPLETE  PROGRAM 
LISTING.) 

BOTH  THE  PROGRAM  LISTING  AND  THE  CROSS  REFERENCE  MAPS  HAVE  FORMATS 
DIFFERENT  FROM  THOSE  OF  OPTIMIZING  FOPTPAN.  (SFE  FTN,  11-6,  13-15? 
FTK/S,  CHAPTFR  IIT-15) 


jn^r  iq/7 


pftcr  u-ii* 


*»»  rqpoq  MF^SAfiPS  ♦»* 

FOPTPAN  COMPILATION  FPPQPC 

IMMCniATPLY  FOLLOWING  T HF  LISTING  OF  THF  FORTRAN  CODE,  ERRORS  ARE 
TPFNTIFT<^C  PY  THE  CARD  NUMPPP  ASSIGNED  PY  THF  PROCESSOR  (INDICATED  ON 
THE  EXTREME  LEFT  SIDE  OF  THF  LISTING).  THF  SEVERITY  OF  THF  ERROR  IS 
INCICATED  by  THF  CODE  ACCOMPANYING  THE  MESSAGE: 

I - INFORMaHVF.  has  no  EFFECT  ON  COMPILATION  OR  EXECUTION 
FC  - FATAL  TO  COMPILATION 
FF  - FATAL  TO  EXECUTION 


FOR  EXAMPLE, 

CAPO  NO. 

SFVFPI TY 

DI  AGNOSTIC 

9 

EE  / 

THE  OPERATOR  INDICATED  (-,  ♦,  *,  /,  OR 
**)  MUST  BE  FOLLOWED  BY  A CONSTANT, 
NAME,  OR  LEFT  PARENTHESIS. 

1 T 

EE 

NO  MATCHING  RIGHT  PARENTHESES. 

R1 

FF 

ILLEGAL  CHARACTER.  THE  REMAINDER  OF 
THIS  STATEMENT  WILL  NOT  BE  COMPILED. 

TO 

T 

NO  END  CARD.  END  LINE  ASSUMED. 

TO 

EE 

undefined  statement  NUMBERS,  SEE 
BELOW.  (NOTE  - THIS  ERROR  WILL 
REFERENCE  THE  END  STATEMENT.) 

NOTE  THAT  FC  ANO  FE  COMPILATION  ERRORS  WILL  ABORT  THE  JOB  UNLESS 
Arp  CPTION  WAS  USED,  IN  WHICH  CASE  THE  LOADER  WILL  PROCEED  UNTIL  IT 
ENCOUNTERS  AN  UNCOMPILED  ROUTINE,  FLAGGED  BY  AN  ILLEGAL  NAME.  THE 
FOLLOWING  MESSAGE  THEN  APPEARS  IN  THE  DAYFILEt 
FATAL  LOADER  ERROR  - 
ATTEMPT  TO  LOAD  SUPPRESSED  BINARY 


FORTRAN  OBJECT  TIME  ERRORS 

THF  FORTRAN  LIBRARY  ANO  IP  ROUTINES  DETECT  MANY  OBJECT-TIME  ERRORS. 
SOMF  APE  INFORMATIVE  AND  PRODUCE  A MESSAGE  IN  THE  OUTPUT  LISTING  ONLY. 
OTHERS  APE  FATAL,  PRODUCING  THE  MESSAGE  ~ETN  - FATAL  ERROR  NN"  IN  THE 
OAYFTLF  and  a more  DEYAILEO  message  in  the  output.  the  OPERATING 
SYSTFm  detects  certain  other  errors,  such  as  ARITHMETIC  MODE  ERRORS. 
LEVEL  A?0  ETN  CONTROL  CARD  OPTION  ER  (DEFAULT  WITH  OPT=0)  REPRIEVES 
THESE  and  INTERdRFTS  THEIR  MEANING  ANO  LOCATION  IN  THE  DAYEILE,  SUCH  AS 
"TNETNITE  value  IN  XY7  NEAP  LINE  N" . FATAL  ERRORS  CAUSE  ALL  "OUTPUT" 
FILE  BL'EefpS  to  be  EMPTIED,  PUT  NOT  OTHER  FILE  BUFFERS. 

SUPPOUTINF  'ERRSET'  MAY  BE  UTILI7E0  TO  ALLOW  THF  PROGRAM  TO  ACCEPT 
CFPTATN  input  data  errors  (CCRM,  FTN,  fl-20;  FTN/S,  III-3-6). 

SUPROUYTNF  'PEFOVR*  WIIH  SUITARIF  AUXILIARY  ROUTINE  MAY  BE  USED  TO  GAIN 
TFMFEO.i'iY  CONTROL  AFTFH  OTHERWISE  FATAL  SYSTEM  ERRORS  (CCRM,  A-16;  FTN, 
8-1?;  FTN/S,  1-8-13;  NOSBE,  6-??;  scope  1?-?0).  subroutine  'SYSTEMC* 
MAY  PF  Ijsrn  TO  change  the  treatment  or  errors  (ETN,  8-lS;  ETN/S, 

TY I . 


FQOTPaK’  SOUPCF  IMPUT  ON  'LFM*  INSTF&D  OF  'INPUT' 
'tflNF  flS  T = r,ONPTLF  (SFF  CCC>n,  7-?,  7-I) 
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»•»  PFaOTNG  DUMPS  - FOPIPaN  OFOUOGING  •»' 

THF  naYFILF  IS  THF  FIPST  PLacF  TO  LOOK  FQP  fpPQPS.  SYSTFm  EPPQP 
NFSSBGFS  AND  MrSSAGFS  FROM  THF  OPFPaTOR  BRF  LISTFO  THFPFIN  (SFF.  FTN, 
8-0;  FTN/S,  ITI-7-1F).  FaCH  CONTPOL  OaPO  FYFDUTEO  TS  LISTFO,  aS  IS  THF 
TTHF. 

FYFCUTION  FPPOPS  GFNFPALLY  aP'"  CF  THRFF  TYPFSS 

FORTPaH  rppoPS  - OFIFFTFO  IN  FORTpaN  OBJFCT  TIHF  ROJTINFS 
N0S/8F  FPROPS  - OFTFCTFD  RY  THF  SYSTEM 
MOOF  FPPOPS  - DFTFCTFD  8Y  THF  CPU 

(SFF  CCPM,  ?-71,  4-lM 

IF  FBTAL  FOPTPaN  COMPILER  FPROPS  APE  FOUND  IN  ANY  SURPPOGPAM,  A 
LINE  IS  GFNFRATEO  IN  THF  OAYFILF  FOP  THAT  SUBPPOGRnM,  AN  allEMPT  TO 
Loac  the  PFSULTING  INVALIO  binary  file  (I.F.,  LG0>  hill  give  a LOADER 
FPPCP,  UNLESS  •■OEBUG“  IS  IN  USE.  THE  FTN  COMPILER  GENERATES  A 
REFERENCE  MAP  FOR  EACH  ROUTINE,  BASED  UPON  THE  VALUE  FOR  ° ON  THF  r TM 
CARP.  THF  DEFAULT,  R = l,  GIVES  A MAP  AOFQIJATE  FOR  LOCATING  nFHS  IN  A 
DUMP  (SEE  fTN,  CHAPTER  12T  ETN/S,  CHAPTFp  IIT-1). 

THF  LOADER  GENERATES  A DIPECTORY  (CORE  RAP)  GF  ENTRY  POINTS,  THE 
FIPST  WOPD  ADDRESS  OF  PROGRAM  UNITS  WITH  CROSS  RE^FPENCF,  AND  THE 
LOFATION  OF  COMMON  BLOCKS,  AS  WELL  AS  A LIST  OF  UNSATTSEIFO  EyTFRNALS 
(SURPPOGPAMS  NOT  FOUNn) . THF  TOTAL  CORF  RFOUIPFO  fqR  THF  LOtOFC 
PPOGRAH  TS  INOTCATFO.  for  BASIC  ( N ON- SFG  L 0 AO/ N ON- O'/FRL  A Y ) LOAOS,  T hF 
total  corf  PFQuIPFD  TQ  LOAD  THF  PROGRAM  IS  ALSO  GIVEN  ON  THF  LAST  LINE. 
LOCATTCNS  0-lIlB  IN  THE  USFR'S  FL  AR^  RESERVED  Fqp  THF  SYSTEM 
COMML'NTCATION  REGION  AND  LOADER  POINTERS.  NOTE  THAT  ^ACH  I/O  BUEEFR 
HAS  a DPEAULT  SI7F  OF  1001  OCTAL  (PLUS  A TG-MORD  FILE  INFORMATION 
TAPLE).  (SFF  SUG,  O-TQ) 

a DMPy  IS  GFNFPATFD  whenever  a program  is  ABORTEO  by  THP  system. 
THIS  DUMP  TNCLUBES  the  CONTFNTS  OF  ALL  REGISTERS,  THF  FIRST  100  WOPRS 
IN  FL  AND  no  WORDS  BFFOPF  AND  AFTEP  THE  LOCATION  IN  THE  PROGRAM 
anCPESS  (P)  PFGTSTFR  AT  THF  TIHF  OF  ABORT.  THE  FATAL  ERROR  IN  A 
PDCGFAM  PUN  ON  THE  COG  6600  MAY  BCIUaLLY  OCCUR  SEVERAL  INSTRUCTIONS 
BFFCPE  the  p annPFSS  DUE  TO  THE  MULURLE  APITHMETTC  UNIX’S.  IF  A 
RELATIVE  DUMP  WAS  PLAMTEO  AFTEP  AN  EXIT  CARO,  THIS  WILL  f 01  L " W TH<- 
DMFY.  SINCE  INSTRUCTIONS  APE  IG  OP  ICI  BITS  IN  LENGTH,  CASH  CM  WORD  IS 
PRINTED  IN  FOUR  COLUMNS  < op  EASY  PEaD’^NG.  fSFE  SITG,  O-r-'Gl 


WHFN  PROGRAM  STOPS  WITH  FpROP  HODE  ? OR  4,  ATTfMRT  TO  LOCAf, 
TNVALTD  VALUE  TN  C(AM  LIST.  T mi  M AT  IS  THE  ADDRESS  of  thf  mjMi'ER. 
calculate  the  NAMF  of  ''Mr  ncmpEP  using  CORF  MAP  AND  PCCRENCF  MAP  WITH 

octbl  artthmet’c.  tf  CfAi;  is  PI  anx,  •'hen  at  is  the  out  ;tf  ranc.f 

aCDPFS'^  TN  FPPOR  MODE  1.  TO  PACK  TRACE  WHERE  A ROUTINE  WA';  GALLED, 
LOCY  ai  IMF  n400XXYxyy  woRD  WHICH  IS  USUALLY  THE  THIRD  WORO  ji-irp 


Ml  apf  optional 


•FTN.'  HILL  USE  ALL  DFFAULT  PARAMETERS, 
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FORTRAN  CALLABLE  UTILITIES 


•CALL  FRRSET  (KOUNT,  MAX)*  ALLOWS  THE  USER  TO  ENCOUNTER 
MAX  ERRORS  IN  FORTRAN  FORMATTED  INPUT  DATA  BEFORE  FATAL 
TERMINATION  (DEFAULT  IS  1).  THE  CURRENT  ERROR  COUNT  IS 
AVAILABLE  TO  THE  USER  IN  KOUNT.  (SEE  FIN,  8-?0;  FTN/S, 
I-S-lf>) 


MAY  BE  USED  TO  CALL  THE  SYSTEM  PROGRAM  ‘FORM*  FROM  A 
FORTRAN  PROGRAM.  DIRECTIVES  ARE  PASSED  TO  'FORM*  EITHER 
DIRECTLY  OR  THRU  AN  EXTERNAL  FILE. 

(SEE  FORM,  5-«t,6,7,  6-14) 


SHOULD  BE  USED  TO  GAIN  TEMPORARY  CONTROL  AFTER  AN  ABORT 
CONDITION  TO  CLOSE  FILES  WHICH  AN  INTERACTIVE  INTERCOM  JOB 
MIGHT  OTHERWISE  LEAVE  OPEN,  AND  TO  CLOSE  OUTPUT  BUFFERS 
FOR  FILES  NEEDED  FOR  A LATER  JOB,  SUCH  AS  SC4060  OR 
CALCOMP  (SEE  FTN,  8-121  FTN/S,  1-8-13;  NOSBE,  6-22*,  SCOPE, 
12-20 ) . FOR  EXAMPLE, 


EXTERNAL  MYENO 
CALL  RECOVR  (MYEND,  779,  0) 
WHERE  USER  SUPPLIES 

SUBROUTINE  MYENO  (EX,  Y,  RA 
DIMENSION  EX (17) 

C CLOSE  40  20  AND  END  FILE  ALTER 
CALL  PLTND  (0) 

FND  FILE  12 

STOP 

END 


ALTERNATE  OUTPUT 
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•^Py  WILL  HFLP  LOCaiF  APF4S  IN  a PPO&PAH  WHERF  THE  CODE  IS 

INEFFICIENT.  SPY  WILL  PFCORO  RESULTS  ON  FILE  'DOSSIFP* 
SHOWING  HOW  MUCH  RELATIVE  TIME  WAS  SPENT  IN  EACH  'RINW* 
WOROS  EROM  •LOW'  TO  'HIGH*. 

TO  TURN  ON  SPYJ 

CALL  SPYONF  <LOW,  HIGH,  NAME,  BINW) 

LOW  - STAPT  (RELATIVE  TO  RA ) OF  AREA  TO  BE  ANALYZED 
HIGH  - PNO  (RELATIVE  TO  RA ) OE  AREA  TO  BE  ANALYZED 
NAME  - LABEL  EQR  THIS  INVOCATION  OF  SPY 

LEET- JUSTIFIED,  1-8  CHARACTERS  (E.G.,  3HABC) 
BINW  - WIDTH  OE  SPY  ANALYSIS.  MAY  BE  1003,  40B,  20B, 
lOB  (OP  EL,  3?,  IS,  8). 

IN  ROET  instances,  1003  (64)  IS  SJEEICIENT. 

TO  TURN  OFF  SPYJ 
CALL  SPYOFF 

BEFORE  PROGRAM  TEPMINATfs,  IT  MUST  "CALL  SPYOFF".  MAY 
NEED  "RFCOVP"  (SEE  CCPM,  4-15). 

PXAMPLPJ 

• • • 

CALL  SPYONF  (lOlB,  40000B,  6HMYPR0G,  lOOB) 

• • • 

CALL  SPYOFF 


NOTE!  WHPN  USING  SPY  ON  THE  6700,  CPB  SHOULD  NOT  BE 
SPPCIEIPO  ON  THE  JOB  CARD. 

(SEE  CCRM,  2-7J  PRNTSPY,  FOR  DIRECTIONS  ON  PRINTING  THE 
resulting  spy  analysis.  see  also  CONV,  CHAPTER  11.) 


FOP  AOniTTONAL  FTN-CALLABLE  CONTROL  CARO  ROUTINES  SUCH  AS  ROUTE, 
RECL'FST,  SKTPEIL,  UNLOAO,  ZPEUNC  (ATTACH,  CATALOG,  ETC.),  SEE  CCRM, 
10-41  NSROC;  CCLIR/N. 
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'^ftMPLE  FORTPftN  DECK  SETUPS 


«»  » 


COEiPTLE  flun  LOftO  ONLY 


XX  XY,r;MS4  Don . 

rHflRGE,XXXX, J JJJJJJJJJ. 

F T N . * • 

Lnflrar,n)  •* 

NOC-P.  ** 

' 7/n/q  EOR 

(BLL  FORTRAN  SOURCE  OFCKS1 
“ f)/7/R/q  EOF 


NBME/CODE 

SEE  OPTIONS  ON  PAGE  4-1 
CHPCXS  FOR  MISSING  SUBROUTINES 
CftUSES  LOftOING  MAP  TO  BE  GENERATED 


CO^'PTLF  AND  EXECUTE  (NO  BINARY  DECKS) 

jnoNBME,....  NAME/COOE 

CHARGE, . . . . 

FTN. 

LGC.  •*  LOAD  AND  EXECUTE 

• 7/R/q  FOR 

(ALL  FORTRAN  SOURCE  DECKS) 

• 7/«/q  FOR 

(DATA  DECK) 

6/7/Rxq  EOF 


COMPILE  AND  EXECUTE,  CATALOG  BINARY  PROGRAM 


JOPKAHC, .... 

CHARGE 

PP  CL'ESY  ,RTNAPY,*PF. 
FTK  (P=PINAPY,0PT=1) 
MAP  (CN ) 

BINARY. 


NAME/COOE 

**  GE'^  SPACE  FOR  PERMANENT  FILE 
*»  OBJECT  CODE  TO  FILE  'BINARY' 
*•  FULL  MAP  FOR  DOCUMENTATION 
**  LOAD  FROM  FILE  AND  EXECUTE 


eatalOG,BINARY,PROGBIN, ID=XXXX,XR=R00NLY. 
• 7/A/q  EOR 

(ALL  FORTRAN  SOURCE  DECKS) 

' 7/»>/q  FOR 

(CATA  PECK) 

6/7/fl/q  FOE 


**  MAKE  file  permanent 
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PA&E  4-lft 


COMPILF,  LOAD  AND  FXFCUTF  (WITH  PUNCHB  OPTION) 


jnPNAMF,.  ... 

CHARGE,  . . .. 

FTN (P= PUNCHB, OPT=l) 
LOAD  (INPUT) 

RUNCHB. 


NAME/CODF 

SEE  OPTIONS  ABOVE 

LOAD  BINARY  DECKS  INTO  MEMORY 

LOAD  (FORTRAN  COMPILATION)  FROM  PUNCHB 

FILF  AND  EXECUTE 


7/S/9  FOR 

(ALL  FORTRAN  SOURCE  DECKS) 

7/A/9  FOR 

(ALL  OTHER  BINARY  DECKS) 

7/8/9  FOR  (PART  OF  BINARY  DECK) 

7/8/9  FOR  (NOT  NEEDED  IF  NO  DATA) 

(DATA  DECK) 

6/7Z8/9  FOF 


EXECUTE  ONLY  (FROM  BINARY  PROGRAM  DECK) 


JOPNAMF 

CHARGE, .... 

INPUT.  **  LOAD  AND  EX 

• 7/8/9  FOR 

(ALL  BINARY  DECKS) 

• 7/8/9  EOR  (PART  OF  BINARY  DECK) 

• 7/8/9  FOR  (NOT  NEEDED  IF  NO  DATA) 

(DATA  DFCK) 

“ 6/^/8/9  EOF 


name/code 


**  LOAD  AND  EXECUTE  PROGRAM 


EXECUTE  ONLY  (BINARY  PROGRAM  ON  PERMANENT  FILE) 


JOBKAMF,....  NAME/CODE 

CHARGE 

ATTArH(OBjFCT,PROGPIN,in=XXXX,MP=l)  »•  RETRIEVE  PERMANENT  FILE 

OBJECT.  ♦*  LOAD  FILE  AND  EXECUTE 

• 7/8/9  EOR  (NOT  NEEDED  IF  NO  DATA) 

(DATA  DECK) 

~ G/7/8/9  EOF 
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COMPILE  AND  EXECUTE  (TAPE  USED) 

(DUMP,  IE  EXECUTION  EPPOPS) 

THIS  JOO  NEEDS  TWO  TAPES)  TAPE?7,  A HIGH-DENSITY  BINAPY  OUTPUT  TAPE 
AND  TAPES,  A HIGM-DENSI T Y , EORMATTED  STRANGER  SLOT  TAPE.  FITNAPV  INPUT 
DATA  ON  DISK  FILE  TAPE16. 

JOBNAME.MT?, . ...  NAME/COOF 

CH ARGE,XXXX, JJJJJJJJJJ. 

ETN. 

ATTACH.TAPE16, IO=XXXX. 

VSN,TAPE«=SLOT2?=FOREGN. 

L ABEL, T APE27,L=XXXXD ATAl, 0=HI ,W,VSN=CA8888, RING. 

REQUEST,! APE8,HI,S, RING. 

LGC. 

RE  TURN,! A PEI  6, tape? 7, TAPE 8. 

EXIT.  •*  FOLLOWING  EXECUTED  ONLY  AFTER  ERROR 

OMP,«»60nO.  **  DUMP  FIRST  46000  OF  FIELD  LENGTH 

RE  TURN,! A PEI 6, TAPE 27, TAPE  8. 

' 7/8/q  FOR 

PROGRAM  LINE (INPUT, OUTPUT, TAPE 5 = 1 NPUT, TAPE 6 = 0U TP UT,  TAPE  2 7 , 

1 TAPE16, TAPES) 

• • • 

REA0(16)  (A(I) ,1=1,32)  - SEE  BELOW 

• • • 

WRITE  (8,5)  (B(I),I=1,32)  *»  ~ SEE  BEIOW 

WRITE  (27)  (B(I)  ,1  = 1,32)  **  - SEE  QFl.OW 

• • • 

END 

• 7/8/9  EOR  (NOT  NEEDED  IE  NO  DATA) 

(DATA  DECK) 

•*  E/7/8/9  EOF 

•*  - PROGRAM  WOULD  BE  MORE  EFFICIENT,  ASSUMING  'DIMENSION  A(32),  B(32)' 
IS  USED,  IF  THE  I/O  LISTS  USED  JUST  THE  ARRAY  NAME  (F.G., 

'READ  (16)  A'). 


r 
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sample  EOPTPAN  input/output  *♦* 

ENCODE,  OUEEEROUT 
PRO  CPI--  TSTAPE  (TAPEO,  ...) 

C TO  WRITf  A STRANGER  TAPE  EOR  AN  OEF-LINE  DEVICE  MAY  USE 

0 nyPTFR  OUT  (WHICH  MEANS  THE  DATA  MUST  DE  CONTIGUOUS  IN  CORE». 

r alternatively,  *ETLE'  cards  and  STANDARD  FORTRAN  READS  AND 

0 WRI TPS  may  he  used. 

''IMPNSION  OIITHUP(P),  H(S0,  20) 

PO  7 NI-1,N 


• * • 

PNCOnE(nC,  IS,  OUTBUE)  I,  J,  R{I,  J) , C,  D,  E,  NI 
IS  FORMAT(7n,  E12.5,  TE12.6,  18X,  4HCARD,  14) 
r PREATE  A STRANGER  TAPE  CODED  FILE  (EVEN  PARITY) 

PUFFER  OUT(q,  0)  (OUTRUE(l),  OUTRUF(S)) 

C WATT  UNTIL  DATA  IS  WRITTEN 

IE  (UNIT(q)  .GE.  0)  GO  TO  9 
END  file  q 
REWIND  q 
ETOP 

8 ...  PRINT  MSG  FOR  PARITY  ON  WRITE 

END 

RUFFERIN,  DECODE 


PROGRAM  PATRICKIT APF?=0 , OUTPUT=128,  INPUT=128) 

C example  of  using  RUFFERIN  TO  SURVEY  THE  CONTENTS  OF  A 

C file  written  with  BT=C,  RT=S  (SEE  CCRM,  4-11) 

PTMEUSION  A (IROOO) 

DATA  I , M/  0,  1/ 

c PUFFER  IN  (2,  1)  (Ad),  AdSOOO)) 

C WATT  UNTIL  DATA  IS  FINISHED  READING  THEN  TO  GO  10 

r ChEDK  for  EOF  OP  PARITY  AND  GO  TO  1?  OR  14  RESPECTIVELY 

TFnjNIT(2))  10,  12,  14 

14  ...  POOF  TO  PRINT  PARITY  MSG,  CONTINUE  PROCESSING  AT  STMT  10 

IP  LeLFNGTH(2) 

T = Td 

C PRINT  RECORD  NUMBER,  LENGTH,  FIRST  4 WORDS 

C TP  RECORD  RXCEFOS  1^000  WORDS,  LENGTH  IS  TRUNCATED 

PRINT  fs,  T,  L,  (A  (K)  , K=l,  4) 

E FORMAT  PFCORO  ” 14,  " LENGTH  ~ 16,  3X,  4022) 

C PFCDOf  SELECTFO  fields  from  alpha  to  NUMERIC  AND  PRINT 

PFCPDF  dlO,  16,  A(1 ) ) J,  B,  n 

IF  FORMAT  (47X,  TT,  F10.6)) 

p PMARACTFR  count  for  single  decode  CANNOT  EXCEED  150 

pFCOPPmO,  16,  Ad?))  N,  D,  E 
PRINT  1»,  J,  N,  B,  P,  n,  F 
1"  FORMAT  (••  <FY  FTFLOS  ",  216,  4F20.6) 

P P TO  5 
rpTvT  7,  M 

7 format  (■•  FND  OF  FILE  " T4  ) 

0 TF  TAPF  HAD  moof  THAN  ONE  FILE,  ADO  CODE  TO 

y,;CPEMFMT  H AMO  CONTINUE  PROCESSING  TAPE 

F MO 
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»*•  OVEPLAY  »»♦ 

(SFP  LOADFR,  CHAPTFP  4 DP  FTN,  7-19  OP  FTN/S,  CHAPTEP  1-12) 

rVFPLAY  ALLOWS  A USER  TO  FIT  A LARGE  PPOGPAP  INTO  SMALLER  AMOUNT  OF 
COPE.  EACH  OVERLAY  CONTAINS  A MAIN  PROGRAM  (ANP  OPTIONALLY 
SUPFROGRAMS)  AND  IS  A SELE-CONTA I NE 0 ABSOLUTE  PROGRAM  LOAOEO  AND 
EXECUTED  WITHOUT  LINKING  DURING  EXECUTION.  OVERLAYS  MAY  BE  PRIMARY  OP 
SECCNOARY,  ALLOWING  ONLY  SELF  OP  UPWARD  REFERENCES.  DATA  COMMUNICATION 
BETWEEN  overlays  IS  ONLY  THROUGH  BLANK  OR  LABELLED  COMMON. 

OVERLAY  DIRECTIVES  BEGIN  IN  COLUMN  7.  THE  MAIN  PROGRAM  IN  EACH 

LFVEL  TRANSFERS  CONTROL  BACK  TO  THE  CALLER  WHEN  THE  'END*  CARD  IS 

EXECUTED.  THE  MAIN  PROGRAM  FOR  EACH  LEVEL  MAY  BE  A SHORT  ONE,  PERHAPS 

CREATEP  TO  CALL  OTHER  SUBPROGRAMS  IN  THF  LEVEL,  OR  A FORMER  SUBPROGRAM 
MAY  BE  MODIFIED.  THE  LOADER  REQUIRES  AT  LEAST  4000  (OCTAL)  LOCATIONS 
FOP  LOADING  THE  (0,0)  OVERLAY. 


OVERLAY  DIRECTIVES 
(PART  OF  ETN  SOURCE  PROGRAM) 

OVERLAY  (LEN,I,J)  PRECEDES  MAIN  PROGRAM  OF  EACH  OVERLAY 

WHERE  LEN  IS  OVERLAY  FILE  NAME 

I IS  PRIMARY  LEVEL  (0-77  OCTAL) 

J IS  SECONDARY  LEVEL  (0-77  OCTAL) 

CALL  OVERLAY(LENLX,I  , J)  CALL  INTO  CORE  AND  EXECUTE 

WHERE  LFNLOC  MAY  BE  LEFT  DISPLAY  CODE 
OF  LEN  OR  A VARIABLE  CONTAINING  I HE  LFN 
IN  LEFT  DISPLAY  CODE,  AND  I,J  ARE  1-63 
DECIMAL  . 

FOR  EXAMPLE,  CALL  OVERLA Y ( 5L OROG 1 , 1 , 0 ) 
(SEE  CCRM,  7-16  FOR  USE  IN  A PROGRAM  IN  A 
L IBPARY. ) 

PROGRAM  NAMEI  NO  ARGUMENT  LIST  ON  SUBLEVEL  PROGRAM. 

ALL  files  must  BE  IDENTIFIED  ON  PROGRAM 
CARD  IN  OVERLAY  (0,0) 

NOTEI  calling  in  A SECONDARY  OVERLAY  WILL  NOT  A UT OM A I IC A L I Y LOAD 
THE  APPROPRIATE  PRIMARY  OVERLAY. 
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*•*  GEGME^TarrON  *•* 

•^COPE  3.5  SEGMENTATION  IS  NO  LONGEP  aVAILARLE. 

SP'^MENl  AT  ION  IN  NOS/RE  IS  PFCOMMENDED  AND  SHOULD  BE  USED  INSTEAD  OF 
OVERLAY.  SEE  CORM,  2-lR. 

SEGMENTarlON  ALLOWS  THE  USEP  TO  FIT  A LARGE  PROGRAM  INTO  A SMALL 
AMOUNT  OF  CORE.  THE  PROGRAM  CONSISTS  OF  ONE  MAIN  PROGRAM  AND  SEVERAL 
SUPPROGRAMS.  ROTH  UPWARD  AND  DOWNWARD  REFERENCES  ARE  PERMITTED. 
many  levels,  each  CONTAINING  MANY  SEGMENTS  ARE  ALLOWED,  RESTRICTED  ONLY 
TO  A TOTAL  OF  4003  SEGMENTS.  MOST  EFFICIENT  USE  OF  CORE  CAN  BE 
ORTAINEC  BY  USING  ONLY  ONE  LEVEL  ANO  NO  BLANK  COMMON.  THIS  WAY,  CORE 
WILL  RE  ALLOCATEO  DYNAMICALLY.  RFCAUSE  THE  STATEMENTS  WHICH  DEFINE  THE 
SEGMENT  structure:  APE  NOT  A PART  OF  THE  PROGRAM,  NO  SOURCE  CODE  CHANGES 
ARE  PECUIRFD  TO  RESTRUCTURE  THE  PROGRAM. 
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SF  I TING  UP  OVERLAY 


PPTGINAL  PPOGPAM 


PROGPAM  TFSOS  (INOUT.OUTPUT, TAPE5  = TNPUT,T APE6  = 0UTPUT,TAPE1  AI 
COMMON  /NAMFO/  X , Y , 7 ( 1 0 , 1 0 0 ) 

TEGOS  calls  two  INDEPENOEMT  subroutines  S good  11/P3/70 
L = 1 

REAO(5,q)  X,Y 

• • • 

CALL  BAB 

• « • 

F = X«-Y 

call  CT(F,L,0» 

STOP 

c PPPMAT (?F1?.G) 

PNO 

SUBROUTINE  BAB 
CTMPNSION  H(7F,?0) 

COMMON  /NAMED/  X , Y , Z ( 1 0 , 1 0 0 ) 

• • • 

CO  G <=1,G 

• • « 

CO  h 1=1, n 

WPITFllA)  (7(T, Jl ,J=1,100) 

P CONTTNUF 
REWIND  lA 
RETURN 
PND 


SUBROUTINP  CT  (F,L,0) 
DIMENSION  P(S0, 100) 
IFrL.EO.  1)  GO  TO  24 


C = P (L,L ) 

PFTtJPN 

24  n B 1 = 1, BO 

B PFAOdA)  (P|I,J),  J=l,100) 

RETURN 

END 


|'^M)-AO«S  559  DAVID  » TAYLOR  NaVAL  SHIP  RCSCARCH  AND  DEVELOPMENT  CE— ETC  P/0  9/2' 
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SAMPLE  OVERLAY 
(SEE  ALSO  CCRM,  7-16) 


nVEPLAY(TESOS,0,0) 

PROGRAM  TFSOS (INPUT, OUTPUT, TAPE5=INPUT,TAPE6=0UTPUT,T A PEI 4) 
TESOS  CALLS  TWO  TNOEPENDENT  SUBROUTINES  S GOOD  11/23770 
••  ENOPUNCHINC  INOICATES  CHANGES  IN  ORIGINAL  PROGRAM 
COMMON  /NAMEO/  X, Y, 7 ( 1 0 , I 0 0 ) 

COMMON  /CCOM/  F,L,Q 
L = 1 

RFAn(5,9)  X,Y 


CALL  OVERLAY  (S HT FSOS , 1 , 0 ) 

• • • 

F = X*Y 

CALL  OVERLAY  (S HTFSOS , 2 , 0 ) 

« • • 

STOP 

F0RMAT(?F12.6) 

FNO 

OVERLAY  (TPSOS, 1,0  » 

PROGRAM  BACA 

OVERLAY  BY  DUMMY  MAIN  PROGRAM 
CALL  BAB 
FNO 

SUBROUTINE  BAR 
niMENSTON  H (7S, 20 ) 

COMMON  /NAMED/  X , Y , Z ( 1 0 , 1 0 0 ) 

• • • 

no  6 K=1,S 

• • • 

no  6 1=1,10 

HPITE(14)  (7(I,J) ,J=1,100) 

6 continue 

PEHIND  14 

RETURN 

END 

OVERLAY  (2,0) 

PROGRAM  CTCA 

OVERLAY  BY  MODIFY  FORMER  SUBPROGRAM 
COMMON  /CCOM/  E,L,Q 
DIMENSION  P(60,100) 

TEfL.EO.  1)  GO  TO  24 

• • • 

0 = P (L,L ) 

GO  TO  40 
24  DO  S T=1,B0 

S REA0(14)  (P(I,J),  J=l,100) 


40  CONTINUE 
END 
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*»•  COMPILF,  LOAD  AND  CATALOG  ABSOLUTE  PROGPAM 


STMPLE  LOAD 

JOPNAMF,....  NAMF/CODE 

CHARGE,. . .. 

FTN. 

PEOUFST,MYPROG,*PF.  ••  MYPROG  FOR  ABSOLUTE  MODULE 

LOAD.LGO. 

NOGO, MYPROG.  ABSOLUTE  MODULE  ONTO  MYPROG 

CAT ALOG, MYPROG, ID=X XXX, XR=RDONLY. 

* 7/«/q  FOR 

PROGRAM  TEST  {... 

• • • 

- 6/7/8/q  EOF 


OVERLAY  LOAD 


JOBNA*«F,  . ... 

CHARGE,.... 

FTN. 

REQUEST, MYOVLY, *PF. 

LOAD,LGO. 

NOGO. 

catalog, MYOVLY, TO=XXXX ,XR=PDONLY. 
» 7/8/q  EOR 

OVERLAY  fMYOVLY,  0,  0) 

C 'MYOVLY'  IS  THE  NAME  OF  THE 

PROGRAM  TFST  (... 

• • • 

“ 6/7/8/q  EOF 


NAME/rODE 

**  MYOVLY  FOR  ABSOLUTE  OVERLAY 
*•  ABSOLUTE  OVERLAY  ONTO  MYOVLY 

ABSOLUTE  overlay  FILE 


SEGLOAD 


JOBNAME, .... 

CHARGE,. . .. 

REQUEST, LGO,*PF. 

FTN. 

C ATALOG,LGO,MYSFGLLGO, ir=XXXX. 

REQUEST, MYSEGL,»PF. 
SFGLOAO,R=MYSEGL. 

LOAD,LGO. 

NOGO. 

CATALOG,MYSEGL,ID=XXXX,XR=RDONLY. 
• 7/«/q  EOR 

(FTN  SOURCE  PROGRAM) 

' 7/8/q  FOR 

(SEGLOAD  CONTROL  CARDS) 

~ 6/7/8/q  EOF 


NAME/COOE 


SAVE  RELOCATABLE  MODULES  FOR 
POSSIBLE  RE-SEGMENTATION 
MYSEGL  FOR  ABSOLUTE  SEGMENTS 


••  ABSOLUTE  SEGMENTS  ONTO  MYSFGL 
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•**  MINNESOTA  FORTRAN  (MNF» 

THF  MINNESOTA  FORTRAN  COMPILER  IMNF),  WRITTEN  AT  THE  UNIVERSITY  OF 
MINNESOTA,  IS  AVAILABLE  ON  THE  DTNSROC  6000  COMPUTERS.  LOCAL  CONTACT 
IS  NCRA  TAYLOR,  CODE  IBB.l,  TELEPHONE  (202)  227-1907. 

THE  NNF  COMPILER  MAY  ACCESSED  AS  FOLLOHSI 

JOBNAMF.CM53000,  ....  NAME  / CODE 

CHARGE,.... 

ATTACH, MNFTN. 

LIBRARY, MNFTN, 

MNF,<OPTIONS>. 

• 7/8/9  EOR 

(FORTRAN  SOURCE  PROGRAM) 

' 7/8/9  EOR 

(DATA  CARDS,  IF  ANY) 

6/7/A/9  EOF 

SOME  OF  THE  <OPTIONS>  AREl 

I=LFN  READ  SOURCE  CARDS  FROM  FILE  'LFN*  (DO  NOT  USE  »I » ALONE). 

B COMPILE  ONLY,  DO  NOT  LOAO-ANO-GO.  PUT  BINARY  OUTPUT  ON  «LGO*. 

B=LFN  COMPILE  ONLY,  DO  NOT  LOAO-ANO-GO.  PUT  BINARY  OUTPUT  ON  *LEN*. 

L=LFN  PUT  PROGRAM  AND  CROSS  REFERENCE  LISTINGS  ON  FILE  'LFN*. 

T TURN  ON  6 OBJECT-TIME  TRACING  FEATURES  (INCLUDING  SUBSCRIPT 

BOUND  CHECKING)  WITH  NO  CHANGE  TO  SOURCE  CODE. 

P=NNNN  MAXIMUM  (DECIMAL)  NUMBER  OF  LINES  ON  FILE  'OUTPUT*  (INCLUDES 
ANY  TRACE  OUTPUT).  (DEFAULT*  5000) 

EXAMPLES*  MNF (I=COMPILE, T, P=1500) 

MNF.  (SAME  AS  MNF, I=INPUT, L=OU TPUT ,P=5 0 0 0. ) 

BINARY  OBJECT  CODE  IS  PUT  ON  LGO.  PROGRAM  IS  LOADED 
WITH  UNDEEINED  CORE  SET  TO  NEGATIVE  INDEEINITES  WITH 
ADDRESSES,  AND  EXECUTED.  NOTE  THAT  NO  *LGO. * CARO  IS 
NEEDED, 


THF  MNF  COMPILER  PERFORMS  SOME  CONSISTENCY  CHECKS  AMONG  RELATED 
PROGRAMS  AND  SUBPROGRAMS.  THEREFORE,  IT  IS  USEFUL  TO  COMPILE  RELATED 
ROUTINFS  TOGETHER  WHENEVER  POSSIBLE. 

MNF  HAS  THE  SAME  EXFCUT 10 N-T I ME  ERRORS  AS  F TN  (IMPROPER  ARGUMENTS 
FOP  MATH  ROUTINES,  ETC.),  BUT,  UNLIKE  FTN,  THEY  ARE  ALL  FATAL. 
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COHPATTBTLITY  KITH  ETNl 

KNF  IS  A DIFFERENT  COMPILER  FROM  COC  FORTRAN  EXTENDED  (FTNI , BUT 
IT  CCMPILES  BASICALLY  THE  SAME  LANGUAGE.  THE  CDC  FTN  VERSION  4 
MANUAL  MAY  BE  USED,  IN  GENERAL,  AS  THE  REFERENCE  MANUAL  FOR  THINGS 
OTHER  than  THE  CONTROL  CARO  OPTIONS.  A PROGRAM  COMPILED  BY  MNF  MAY 
CAIL  SUBPROGRAMS  COMPILED  BY  FTN,  FOR  EXAMPLE,  THE  MATH  SUBROUTINE 
LIBRARIES  SUCH  AS  IMSL. 

ADVANTAGES! 

MNF  COMPILES  FASTER  THAN  FTN  OPT=0,  HAS  MORE  AND  BETTER  DIAGNOSTICS, 
BETTER  COMPILATION  AND  CROSS  REFERENCE  INFORMATION,  MORE  POWERFUL 
DEBUGGING  AND  TRACING  CAPABILITY.  IT  ANTICIPATES  SOME  FEATURES  OF  THE 
PRCPCSED  ANSI  FORTRAN  77  STANDARD,  SUCH  AS  ‘PARAMETER*  AND  ‘IF-THEN- 
ELSE*.  IT  ALLOWS  »ENO=‘  AND  ‘ERR=‘  IN  READ  STATEMENTS. 

DISADVANTAGES! 

EXECUTION  TIME  OF  COMPILED  PROGRAMS  IS  SLOWER  THAN  FTN  OPT=l  OR  2. 
THEREFORE,  AFTER  A PROGRAM  IS  DEBUGGED,  IT  SHOULD  BE  RECOMPILED  AT 
OPT=l  FOR  NORMAL  USAGE. 


A DOCUMENT  f8  PAGES  AT  8 LINES  PER  INCH)  DESCRIBING  MNF  MAY  BE 
OBTAINED  BY! 

BEGIN, UTILITY,,PROGDOC, OTHER,, MNF, OUTPUT. 
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PATIONflL  FORTPAN  (PATFORI 

rational  FORTRAN  IS  A PROGRAMMING  LANGUAGE  THAT  HAS  THE  STRUCTURE 
FORMING  STflTEMFNTS  THAT  ALLOW  “TOP  DOWN”  AND  “GO  TO-LESS"  PROGRAMMING. 
RATFCR  IS  USED  AS  A SOFTWARE  ENGINEERING  TOOL  TO  AID  IN  PRODUCING  AND 
MAINTAINING  COMPLICATED  COMPUTER  PROGRAMS.  RATFOR  IS  A PRE-COMPILER 
(FTN  MUST  PE  EXECUTED  AFTER  RATFOR).  RATFOR  IS  CLOSER  TO  THE  PROPOSED 
ANSI  FORTRAN  77  STANDARD  THAN  FTN. 

RATFOR  IS  MAINTAINED  ON  THE  DTNSRDC  COC  6000»S  BY  MEL  HAAS,  CODE 
1PA3,  (20?)  ??7-i933.  QUESTIONS,  SUGGESTIONS  AND  TROUBLE  REPORTS 
SHOULD  BE  directed  TO  HIM. 

A DOCUMENT  (12  PAGES)  DESCRIBING  RATFOR  MAY  BE  OBTAINED  BY 
nFGIN,UTILITY,, DROGDOC, OTHER,, PATEOR, OUTPUT. 


i 
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COROL 

INTPOmjCTION  TO  COBOL  4 *•* 

THE  COROL  COMPILER  IN  USE  AT  OTNSRDC  ON  THE  CONTROL  DATA  feOOO 
NOS/PE  SYSTEM  IS  COROL  4.  THE  COMPILER  IS  OESICNED  TO  RE  A SUPERSET  OE 
ANSI  COROL  STANOARO)  . A CONTROL  CARD  OPTION  CAUSES  THE  COMPILER 

TO  DIAGNOSE  AS  ERRORS  ANY  NON-ANSI  FEATURES  USED.  THIS  CHAPTER  DOES 
NOT  DESCRIBE  THE  COROL  4 LANGUAGE  (SEE  PAGE  It  COBOL). 


*»•  COROL  CONTROL  CARD  PARAMETERS  ••• 


examples  COBOL.  DEFAULTS  TO  I=I NPU T , L=OU TPUT » B=LGO 

COROL (I=COMPILE,LR,B=0) 

COBOL, I=COMPILE, LRM,U. 

COBOL (E=M AIN, OR= OVER, SUB) 

aCIIDM 

B=PUKCHB  GIVES  PUNCHED  BINARY  DECKS  OE  ALL  ROUTINES;  NO  BCD 

SEQUENCING  AT  END  OF  CARDS 
B=LEN  PUTS  BINARY  IMAGES  ON  FILE  *LEN' 

B=0  SPECIFIES  NO  BINARY  OUTPUT 

B DEFAULTS  TO  B=LGO 

0 SETS  A FLAG  THAT  INHIBITS  LOADING  OE  THE  RELOCATABLE 

BINARY  WHEN  AN  E DIAGNOSTIC  IS  ENCOUNTERED  AND  DISPLAYS 
THE  FOLLOWING  MESSAGE  ON  THE  OAYEILEt 

FATAL  COBOL  ERROR  OR  D OPTION  IN  EFFECT 

DP  CAUSES  CODE  TO  BE  GENERATED  THAT  CHECKS  THE  UPPER  LIMITS 


OE  THE  SUBSCRIPTS  TO  INSURE  THAT  THEY  DO  NOT  EXCEED  THE 
SIZE  OF  THE  OCCURS  CLAUSE.  NO  SUBSCRIPT  CHECKING  IS  DONE 
IE  OB  IS  NOT  SELECTED.  THIS  OPIION  SHOULD  BE  USED  AS  A 
DEBUGGING  AID. 

OBI  ALLOWS  THE  GENERATION  OE  OBJECT  CODE  WHICH  CALLS  THE  TRACE 

FEATURE  TO  TRACE  THE  FLOW  OE  THE  PROGRAM.  THIS  PARAMETER 
MUST  NOT  BE  SELECTED  UNLESS  THE  TRACE  FEATURE  IS  ENTERED 
BY  THE  COBOL  SOURCE  PROGRAM.  SEE  COBOL,  CHAPTER  11-14. 

E=PROG-NAME  MUST  BE  USED  WHEN  THE  OUTPUT  OF  A COBOL  COMPILATION  IS  TO 
BE  ADDED  TO  A USER  LIBRARY  WITH  EOITLIB.  THE  PROG-NAME  IS 
THE  NAME  BY  WHICH  THE  PROGRAM  WILL  BE  CALLED  WHEN  EXECUTED 
FROM  THE  LIBRARY.  IT  MUST  BE  FIVE  CHARACTERS  OR  LESS  AND 
MUST  NOT  DUPLICATE  THE  NAME  IN  ANY  PROGRAM-ID  CLAUSE,  ANY 
ENTRY  CLAUSE  OR  ANY  IMPLEMENTOR  NAME  IN  A SELECT  OR 
SPECIAL-NAMES  CLAUSE.  A LOAD,  NDGO  SEQUENCE  WHICH  CREATES 
AN  ABSOLUTE  FILE  ON  A FILE  NAMED  'COBCODE*  MUST  PRECEDE 
THE  EOITLIB  DIRECTIVES. 

I=LEN  USED  IE  COBOL  SOURCE  INPUT  IS  ON  »LEN»  INSTEAD  OF  *INPU^' 

I defaults  to  I=INPUT 
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L=LFN  INHICATFS  THE  FILE  ON  HHICH  A NORMAL  LISTING  IS  WRITTEN. 

A NORMAL  LISTING  INCLUDES  SOURCE  STATEMENTS  AND  MAJOR  (C 
AND  E)  DIAGNOSTICS 

L=0  LIST  OUTPUT  IS  SUPRESSED  EXCEPT  FOR  C AND  E DIAGNOSTICS 

L DEFAULTS  TO  L=OUTPUT 

THE  LIST  PARAMETER  KEY  LETTER  »L»  MAY  BE  SUFFIXED  BY  ANY 
COMBINATION  OF  THE  FOLLOHG  OPTIONS  TO  PROVIDE  FEATURES  IN 
IN  ADDITION  TO  THE  NORMAL  LISTING. 

X INCLUDES  T AND  U DIAGNOSTICS  ON  LIST  OUTPUT 

R PRODUCES  A DATA-NAME  AND  PROCEDURE-NAME  CROSS  REFERENCE 

C INCLUDES  SOURCE  STATEMENTS  COPIED  FROM  A SOURCE  LIBRARY 
IN  THE  LIST  OUTPUT 

0 PRODUCES  OBJECT  CODE  LISTING  (USE  ONLY  WHEN  REQUESTED 
BY  18B2» 

M PRODUCES  A DATA  MAP 

N OR  o CAUSES  NON-ANSI  FEATURES  TO  BE  DIAGNOSED  BY  THE  COMPILER 

AS  E TYPE  ERRORS 

OB=LFN  BINARY  OUTPUT  FROM  SEGMENTS  IS  PLACED  ON  FILE  'LFN* 

SUP  SUPPRESSES  CERTAIN  OUTPUT  FROM  COMPILATION  OF  A SUBPROGRAM 

SUPM  INDICATES  THAT  THIS  COBOL  SUBPROGRAM  WILL  BE  CALLED  FROM 

A MAIN  PROGRAM  WRITTEN  IN  ANOTHER  LANGUAGE 

U SELECTS  THE  STANDARD  CDC  COLLATING  SEQUENCE  FOR  SORT  VERB 

EXECUTION  AND  INDEXED  SEQUENTIAL  FILE  CREATION  INSTEAD  OF 
THE  DEFAULT  ASCII  COLLATING  SEQUENCE. 

Z IGNORES  THE  COBOL  4 FEATURES  AND  PRODUCES  AN  OBJECT 

PROGRAM  THAT  IS  COMPATIBLE  WITH  COBOL  3 FILES. 

FOR  FURTHER  EXPLANATION  AND  OTHER  PARAMETERS,  SEE  COBOL,  CHAPTER  II-IO. 


***  COBOL  COMPILATION  ERRORS 

WHEN  THE  COMPILER  DETECTS  A SOURCE  LANGUAGE  ERROR,  IT  PRINTS  OUT 
ONE  OR  MORE  DIAGNOSTIC  MESSAGES  FOLLOWING  THE  SOURCE  LISTING.  EACH 
MESSAGE  IS  ASSOCIATED  WITH  AN  IDENTIFYING  NUMBER,  A SEVERITY  CODE  AND 
THE  line  number  in  WHICH  THE  ERROR  OCCURRED.  THE  SEVERITY  OF  THE 
DIAGNOSTIC  IS  INDICATED  BY  A CODE  LETTER!  T - TRIVIAL: 

u - unconventional:  e - error:  and  c - catastrohpic. 

A OAYFILE  MESSAGE  GIVING  THE  TDTAL  NUMBER  OF  DIAGNOSTICS  IS  PRINTED 
FOR  EACH  COMPILATION. 
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CONVERSION  TO  COROL  ERON  IBM  S/360  ••• 

THE  IBM  S/360  COBOL  REFERENCEO  IS  COBOL  F,  HOWEVER  THE  CONCEPTS 
APFi  Y IN  MOST  CASES  TO  ANY  OTHER  VERSION  OF  COBOL. 

1.  TO  ENCLOSE  NON-NUMERIC  LITORALS,  COC  COBOL  USES  DOUBLE  QUOTES 
(•)  WHILE  IBM  USES  SINGLE  QUOTE  (*». 

2.  ALL  DATA  PASSED  FROM  COBOL  MAIN  PROGRAM  TO  COBOL  SUBPROGRAMS 
MUST  BF  DFFINFO  IN  THE  COMMON-STORAGE  SECTION.  IT  IS  NOT  POSSIBLE  TO 
PASS  DATA  THAT  IS  DFFINFO  IN  THE  WORKING-STORAGE  SECTION  TO  COBOL 
SUBPROGRAMS.  NON-COBOL  SUBPROGRAMS  CAN  ACCEPT  ITEMS  FROM  WORKING 
storage  VTA  THE  ‘USING*  PART  OF  THF  CALL  STATEMENT.  ALL  DATA  ELEMENTS 
IN  THE  COMMON  MUST  RE  DEFINED  IN  THE  SAME  ORDER  AND  BE  THE  SAME  LENGTH 
IN  BOTH  MAIN  AND  SUBPROGRAM. 

FOR  EXAMPLE  IN  THE  MAIN  PROGRAM 
01  GROUP-DATA-ELFMENT. 


02 

FILLER 

PICTURE 

XXX. 

02 

ELEMENTRY-1 

PICTURE 

Xt4)  . 

02 

ELEMFNTRY-2 

PICTURE 

XXX. 

while  in  the  subprogram 
01  GROUP-DATA-ELEMFNT  picture  X(10). 

WHEN  COMPILING  A COBOL  SUBPROGRAM  TO  BE  LOADED  WITH  A COBOL  MAIN 
PROGRAM,  AN  ADDITIONAL  OPTION  *SUB*  MUST  BE  INCLUDED  ON  THE  COBOL 
CONTROL  CARD  TO  PREVENT  THF  COMPILER  FRCM  WRITING  DUPLICATE  DATA 
OIVISICN  ENTRIES  ON  THE  LGO  FILE.  ALL  FILES  USED  BY  A SUBPROGRAM 
MUST  RE  DFFINEO  IN  THE  MAIN  COBOL  PROGRAM. 

3.  IN  THE  FILE  CONTROL  AREA  THE  SELECT  CLAUSE  IS  USED  TO  RELATE  A 
LENGTHY  COBOL  REFERENCE  TO  A FILE  NAME  THAT  FITS  THE  CONVENTIONS 

established  by  the  computer  manufacturer,  in  cdc  systems  the 

'IMPLEMENTOR  NAME*  MUST  NOT  EXCEED  7 CHARACTERS,  MAY  NOT  BE  BOUND  BY 
OUCTES,  AND  MUST  RE  THE  ACTUAL  LOCAL  FILE  NAME  (LFN). 

CDC  CONVENTIONS  ARE  SIMPLE  AND  EASY  TO  USE.  THERE  ARE  FOUR  SPECIAL 
'IMPLEMENTOR  NAMES*  INPUT,  OUTPUT,  PUNCH,  AND  PUNCHB.  FOR  EXAMPLE  - 

SELECT  CAPO-INPUT,  ASSIGN  INPUT. 

SELECT  PRINTER,  ASSIGN  OUTPUT. 

SELECT  CARD-PUNCH,  ASSIGN  PUNCH. 

SELECT  CARD-PUNCH-BIN,  ASSIGN  PUNCHB. 

ALL  RECORDS  READ  FROM  CARD-INPUT  WILL  BE  THE  CARO  IMAGES  FROM  THE 
card  reader.  all  pFCORDS  written  to  printer  will  be  PRINTED  ON  ANY 
AVAILAPLF  PRINTER  AFTER  JOB  TERMINATION.  ALL  RECORDS  WRITTEN  TO 
CARD-PUNCH  OP  CARD-PUNCH-BIN  WILL  BE  PUNCHED  AFTER  JOB  TERMINATION. 
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3.  C0NTINUF9. 

IN  T9M  COROL  ALL  FILES  *SELECT»ED  MUST  BE  ON  DO  CONTROL  CAROS  EVEN 
IF  FMPTY  AND  USED  ONLY  OURING  PROGRAM  CHECK-OUT  RUNS.  WITH  CDC  6000 
FYTERNflL  CONTROL  CAROS  ARE  NOT  ALWAYS  REQUIRED.  IE  A NAMED  INPUT  FILE 
NFFC  NOT  BE  PRESENT  WHEN  THE  OBJECT  PROGRAM  IS  EXECUTED,  THE  WORD 
OPTICNAL  MUST  BF  SPECIFIER  BETWEEN  THE  FILE  NAME  AND  THE  WORD  SELECT. 
WHEN  AN  OPTIONAL  FILE  IS  NOT  PRESENT,  THE  FIRST  READ  ATTEMPT  WILL 
IMMFDIATFLY  SATISFY  THE  »AT  END*  CONDITION  AND  CONTROL  WILL  PASS  TO  THE 
PROCEDURE  TO  RF  EXECUTED  »AT  END*.  IE  ONE  OR  MORE  'SELECT'Ea  FILES  ARE 
TO  PE  WRITTEN,  THEY  WILL  RF  CREATED  BY  THE  SYSTEM  ON  MASS  STORAGE.  ALL 
DISK  OUTPUT  FILES,  FXCEPI  THE  SPECIAL  FILES  OUTPUT,  PUNCH,  AND  PUNCHB 
WILL  RF  RELEASED  BY  THE  SYSTEM  UPON  JOB  TERMINATION  UNLESS  PROVISION  IS 
HADF  TO  CATALOG  THEM. 

4.  AS  IN  IRM  COBOL  AN  SD  (SORT  DESCRIPTION)  IS  REQUIRED  WHEN  THE 
SOPT  VERB  IS  TO  BF  USED.  IN  ADDITION,  CDC  COBOL  REQUIRES  A SELECT 
CLAUSE  FOR  THF  OBJECT  OF  THE  SO  ENTRY. 


FOP  example  - 

SELECT  SORT-FTLP, 


ASSIGN  TEMP. 


SORT-FILE,  DATA  RECORD  IS  SORI-RECORD. 
'ORT-RFCORO. 

02  OATA-FLEMFNT-1  picture  XX. 

FTC. 


5.  IN  THP  FILE  DESCRIPTION  ENTRIES  'RECORDING  MODE*  MAY  NOT  BE 
F,  U,  DR  V.  THE  OPTIONS  ARE  DECIMAL  OR  BINARY.  THE  USE  OF  BINARY 
RESULTS  IN  GPEATFP  EFFICIENCY  WHEN  WRITING  NOS/BE  TAPES  WHICH  HAVE  A 
FORMAT  PECULIAR  TO  THF  CDC  6000.  IF  THE  ‘RECORDING  MODE*  CLAUSE  IS  NOT 
USED,  THF  COMPILER  DEFAULTS  TO  DECIMAL.  TAPES  WRITTEN  AS  DECIMAL 
AMD  READ  AS  BINARY  WILL  CAUSE  TAPE  READ  ERRORS  ( AND  VICE  VERSA). 
the  ‘RFCOROING  MODE*  CLAUSE  HAS  NO  MEANING  WHEN  THE  FILE  IS  A DISK 
OR  MASS  STORAGE  FILE. 


6.  WHEN  THF  ‘LABEL  RECORDS  ARE  STANOARD‘  CLAUSE  IS  USED,  THE  CDC 
compiler  assumes  a tape  label  that  HAS  PREVIOUSLY  BEEN  DEFINED  WITH  A 
NOS/PF  SYSTEM  ‘LABEL*  CONTROL  CARO.  THE  OPPOSITE  IS  TRUE  IN  IBM  COBOL 
where  all  disk  files  must  BE  DESCRIBED  AS  ‘LABEL  RECORDS  ARE  STANDARO‘. 

7.  THF  ‘BLOCK  CONTAINS  XYX  RECORDS/CHARACTERS*  CLAUSE  MAY  NOT  HAVE 
THF  same  Meaning  in  coc  cobol  as  on  the  36o.  omission  of  the  block 

CONTAINS  CLAUSE  WILL  RESULT  IN  A BLOCK  SI7E  BEST  SUITED  TO  THE  NOS/BE 
OEVICF  TO  WHICH  THE  FILE  IS  ASSIGNED. 

FOR  S AND  L TAPES,  THE  BLOCK  CONTAINS  XXX  RECORDS  CLAUSE  PROVIDES 
THE  MOST  EFFICIENT  OPERATION. 

n,  THE  FIRST  ENTRY  IN  THF  ‘PROCEDURE  DIVISION‘  MUST  BE  A PARAGRAPH 
NAME.  IF  NOT,  A DIAGNOSTIC  MESSAGE  WILL  BE  GENERATED. 

FOP  fyamplf  - 

PROCFDURF  DIVISION. 

"EGIN-PROGRAM. 

OPEN  INPUT,  .... 
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9.  P9INTFP  CAPPIAGT  CONTROL  IS  ACHTEVEO  BY  THE  SPECIAL  CHARACTERS 

that  appear  in  the  first  position  of  the  rfcoro  to  be  printed,  cdc  has 

THF  following  conventions: 

1 PAGE  eject 

plank  spacing  one  line  I 

0 spacing  two  lines 

SPACING  THREE  LINES  (NOT  FOR  200UT) 

♦ NO  advance 

SOHF  OTHER  CARRIAGE  CONTROL  CHARACTERS  ARE  LESS  FREQUENTLY  USED. 

WHEN  USING  THF  CLAUSE  'WRITE  XXXX  AFTER  ADVANCING  X LINES',  WHERE 
'X'  IS  A number  greater  than  zero,  the  carriage  will  SPACE  THE 
INCTCATED  number  OF  LINFS.  PAGF  EJECTION  HOWEVER  REQUIRES  A *1'  IN  THE 
FIRST  POSITION  OF  THF  OUTPUT  LINE.  THE  IBM  COBOL  'AFTER  ADVANCING  0 
LINES'  MUST  BF  CHANGED.  FOR  EXAMPLE! 

WRITE  XXXX  AFTER  ADVANCING  SKIPO. 

WHERE  SKIPO  IS  DEFINED  IN  THE  SPECIAL-NAMES  PARAGRAPH. 

SOURCF-COMPUTFR.  6700. 

OBJECT-COMPUTER.  6700. 

SPECIAL-NAMES. 

'!•  IS  SKIPO. 

10.  QUOTES  MUST  BE  REMOVED  EROM  THE  'IMPLEMENTOR  NAMES'  OR 
'FXTFRNAL-FTLF-NAMES'  in  the  SELECT  CLAUSES.  QUOTES  ARE  NOT  NEEDED  ON 
ENTRY  POINT  NAMFS  USED  IN  CALL  OR  ENTER  STATEMENTS.  QUOTES  ARE  NOT 
NEECFD  ON  THE  'PROGRAM-ID',  WHICH  MAY  BE  UP  TO  30  CHARACTERS  LONG, 

ALTHCUGH  ALL  PUT  THF  FIRST  7 WILL  BE  IGNORED  BY  THE  COMPILER. 

11.  INPUT  and  output  PROCEDURES  ARE  SLOWER  THAN  THE  'USING'  AND 
'GIVING'  OPTIONS,  PUT  THE  INPUT  AND  OUTPUT  PROCEDURES  ALLOW  SOME 
MAMPULATTON  OE  data.  if  INPUT  PROCEDURE  OR  OUTPUT  PROCEDURE  IS 

specified,  the  user  must  provide  such  procedures  in  the  form  of 

SECTIONS  WITH  SECTION  HEADERS. 

1?.  ALL  variable  subscripts  SHOULD  BF  DEFINED  AS  ' COMPU T AT lONAL- 1 ' 
independent  data  pLFMFNTS.  in  addition,  variable  subscripts  SHOULD 
BF  IKCRFMENTFD  BY  SIMILARLY  DEFINED  ELEMENTS.  FOR  EXAMPLE,  TO 
VARIABLE  SUBSCRIPT  'A'  BY  ONE,  USEl 
77  A PICTURE  SB,  COMP-1,  VALUE  ??. 

77  CNF  PICTURE  SB,  COMP-1,  VALUE  1. 

ADO  ONE  TO  A. 

MOVE  DATA-NAMF  (A)  TO  .... 


IF 

VA 

CO 

MF 

ILF 

0 

PF 

PF 

OR 

M 

T 

CD 

PF 

. 

WH 

CO 

PF 

S 

I 

NC 

AL 

TF 

RE 

P 

B 

RIABLF  SUBSCRIPTS  ARE 
GENEPATES  OBJECT  CODE 
HE  SUBSCRIPTING  OPERA 

en  a fixed  subscript 

E THE  COMPILER  CONVER 
Y PROGRAM  execution. 


DEFINED  AS  NUMERIC  D 
TO  CONVERT  THE  ITEMS 
TION,  AND  THEN  CONVER 
IS  USED,  IT  MAY  BE  IN 
TS  IT  TO  'COMPUTATION 


ISPLAY  ITEMS,  the 
TO  COMPUTATIONAL-1 
T BACK  TO  DISPLAY 
NUMERIC  DISPLAY 
AL-1'  AND  IT  IS  NOT 


, 


fe 
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i:?.  ANY  IBM  S/ieO  PROGRAM  USING  INDEXED  SEQUENTIAL  (ISAM)  WILL 
REQUIRE  SOME  CONVERSION  TO  USE  CDC  INDEXED  SEQUENTIAL  FILE  ORGANIZATION. 
(SEE  COBOL,  CHAPTER  II-2  AND  RMCOB,  CHAPTER  7.) 

14.  COBOL  DEBUGGING  AIDS  DO  NOT  INCLUDE  THE  SPECIAL  VERBS 
•TRACE*,  'EXHIBIT*,  *EXHIBIT  NAMED',  WHICH  ARE  IBM  EXTENSIONS.  SEE 
COPCL,  CHAPTER  11-14. 

15.  THE  LEN  parameter  ON  THE  EILE  CARD  ALLOWS  FILE  NAME 
SUBSTITUTION  AT  EXECUTE  TIME.  FOR  EXAMPLE,  A RELOCATABLE  COBOL  OBJECT 
RRCGRAM  was  COMPILED  WITH 

SELECT  TRANSEILE  ASSIGN  TO  INPUT. 

TO  SUBSTITUTE  A PREVIOUSLY  CATALOGED  DISK  EILE  FOR  THE  FILE  *INPUT* 
WITHCUT  RECOMPILING,  THE  EOLLOWING  CONTROL  CAROS  COULD  BE  USEDt 

ATTACH,8IN,C0B0LBIN,I0=XXXX. 

ATTACH,FIL,OISKTRANSFIL,IO=XXXX. 

EILE, INPUT, LFN=FIL. 

L0SET,EILES=INPUT. 

BIN. 

NOTE*  THE  EILE  TO  BE  SUBSTITUTED  MUST  HAVE  COMPATIBLE  RECORD  MANAGER 
BLOCK  AND  RECORD  TYPES  OR  OTHER  PARAMETERS  WILL  BE  REQUIRED. 

NOTE)  DO  NOT  ATTEMPT  TO  CHANGE  THE  NAME  OF  AN  EXISTING  SIS  OR  DIRECT 
ACCESS  file. 
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COBOL  4 VFRSUS  COBOL 


• • • 


COBOL  U HAS  54  AOOITIONAL 

ALL  COBOL  4 PPOGRAMC  WILL 
FUNCTIONS. 


RFSFPVFD  WOROS.  SE^  COBOLt  APPENDIX 
USE  RECOPO  MANAGER  FOR  INPUT/OUTPUT 


C. 


COBOL  4 USES  THE  'BLOCK  CONTAINS'  CLAUSE  TO  DETERMINE  THE  RECORD 
MANAGEP  BLOCK  TYPE  'BT'  AND  THE  'RECORD  CONTAINS*  CLAUSE  TO 
determine  THE  RECORD  MANAGER  REuOPO  TYPE  'RT'  TO  BE  ASSIGNED. 

WHEN  PROCESSING  FILES  ON  NOS/BE  DEVICES  WITH  A COBOL  4 PROGRAM, 

THE  'BLOCK  CONTAINS'  CLAUSE  SHOULD  BE  OMITTED  OR  STATED  AS  'BLOCK 
CONTAINS  NNN  CHARACTERS'  <WHERE  NNN  IS  THE  PRU  SIZE  OF  THE  NOS/BE 
DEVICE  BEING  USED)  FOR  EFFICIENT  USE  OF  THE  DEVICE. 

WHEN  PROCESSING  FILES  ON  'S'  OR  *L ' T'pES,  THE  'BLOCK  CONTAINS' 
CLAUSE  SHOULD  BE  STATED  AS  'BLOCK  CONTAINS  NNN  RECORDS'. 

FOR  COBOL  USE  OF  RECORD  MANAGER,  SEE  RMCOB. 

NOS/BE  1.0  UNIT  RECORD  DEVICE  FILES  MUST  BE  PROCESSED  WITH  A ZERO- 
BYTE  TERMINATED  RECORD  TYPE  DESIGNATION,  'RT=Z'.  OTHER  FILES  MAY 
NEED  TO  BE  DESCRIBED  AS  CONTAINING  ZERO-BYTE  TERMINATED  RECORDS. 

ANY  file  WHICH  ORIGINATED  ON  THE  CARO  READER  BUT  NO  LONGER  HAS  THE 
LOGICAL  FILE  NAME  'INPUT'  OR  ANY  FILE  WHOSE  ULTIMATE  DESTINATION  IS 
TO  BE  'OUTPUT'  OR  'PUNCH'  SHOULD  BE  DESIGNATED  AS  CONTAINING  ZERO- 
BYTE  terminated  RECORDS. 

COBOL  4 AUTOMATICALLY  FORCES  'RT=Z'  FOP  ANY  FILE  ASSIGNED  TO 
'INPUT',  'OUTPUT',  'PUNCH',  OR  'PUNCHB'  IN  THE  'SELECT'  STATEMENT. 
SHOULD  THE  PROGRAMMER  NEED  TO  DESIGNATE  'Z'  TYPE  RECORDS  ON  OTHER 
THAN  THESE  FILES  HE  MUST  CHOOSE  ONE  OF  THE  FOLLOWING  MEANS — 


A)  A *-FZ*  APPENDED  TO  THE  LOCAL  FILE  NAME  IN  THE  'SELECT' 

CLAUSE  FORCES  '7'  TYPE  RECORDS  AND  OVERRIDES  THE  BLOCK  CONTAINS 
CLAUSE. 

EXAMPLE  — SELECT  C0B0L3riSKFILE  ASSIGN  TO  DISKl-FZ. 

NOTE — THE  LOCAL  FILE  NAME  USED  ON  NOS/BE  CONTROL  CAROS  DDES  NOT 
USE  THE  '-FZ',  I.E.,  THE  ATTACH  WOULD  READ — 

ATTACH,DISK1, ANYFTLE, ID=XXXX. 
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R)  USF  CF  'FIL*^'  AND  'LOSFT*  CARDS  FOR  THF  LOCAL  FILE  NAME 
Ot^  THE  file  with  'Z*  TYPE  RECORDS  WILL  OVERRIDE  THF  COBOL 
r.FNFRATEO  BLOCK  AND  RECORD  TYPES. 

example — 

JOB  CARD 
CHARGE  CARD 
COBOLtLR,U) 

ATTACH(niSKl, ANYFILE,IO=XXXX) 

FILE(0TSK1,BT=C,RT=Z) 

LOSET(FILFS=DrSKl) 

LGO. 

' 7/8/q  EOR 

(COBOL  SOURCE  PROGRAM) 

” 6/7/8/B  EOF 

4.  COBOL  3 IGNORED  THE  BLOCK  CONTAINS  CLAUSE  AND  PROCESSED  SCOPE 
CODED  MASS  STORAGE  OR  TAPE  FILES  AS  ZERO  BYTE  TERMINATED  RECORD 
FILES.  PROCESSING  OF  THESE  FILES  MAY  BE  DONE  AS  DESCRIBED  ABOVE 
CR  BY  USING  THF  »Z*  PARAMETER  ON  THE  COBOL  CONTROL  CARD. 

5.  IN  COBOL  3 IF  A NONEXISTENT  SEQUENTIAL  ERE  WAS  OPENED  AS  'INPUT* 
THF  'AT  END*  BRANCH  WAS  TAKEN  ON  THE  FIRST  READ  FOR  THE  FILE, 
REGARDLESS  OF  THE  SPECIFICATION  OF  'OPTIONAL'  IN  THE  'SELECT' 
paragraph.  in  COBOL  4 IT  IS  FATAL  TO  OPEN  A FILE  AS  'INPUT'  IF  THE 
FILE  DOES  NOT  EXIST.  IF  'OPTIONAL'  IS  SPECIFIED,  THE  'OPEN'  IS 
legal  and  the  'AT  END'  IS  TAKEN  ON  THE  FIRST  READ. 

h.  THE  VALUE  SRECIEIEO  IN  THE  'ADVANCING'  PHRASE  OF  THE  'WRITE'  VERB 

NOW  CAUSES  THE  EXACT  NUMBER  OF  LINES  TO  BE  ADVANCED  ON  THE  PRINTER. 
SINCE  COBOL  3 COUNTPD  BLANK  LINES  HERE,  ANY  PAPER  ADVANCEMENT  IN 
COPOL  4 IS  REDUCED  BY  ONE  EROM  COBOL  3.  THE  COMBINATION  OF  A WRITE 
LINEX  AFTER  ADVANCING  NNN  LINES  FOLLOWED  BY  A WRITE  LINEXX  BEFORE 
ADVANCING  NNN  LINES  WILL  RESULT  IN  LINEXX  BEING  WRITTEN  OVER  THE 
TOR  OF  LINFX. 

NOTF--DO  NOT  MAKE  THE  AFTER  ADVANCING  CHANGES  TO  YOUR  PROGRAM  IF 
YOU  ARE  USING  THF  Z PARAMETER  ON  THE  COBOL  CARO. 

7,  UNDER  SCCRR  3.3,  THE  SYSTEM  DEFAULT  COLLATING  SEQUENCE  WAS  THE  COC 
STANDAPO  COBOL  COLLATING  SEQUENCE  (ALPHABETICS  PRECEDE  NUMERICS). 
UNDER  NOS/BE  1.0,  THE  SYSTEM  DEFAULT  COLLATING  SEQUENCE  IS  THE 
ASCTI6  collating  SEQUENCE  (NUMERICS  PRECEDE  ALPHABETICS).  10 

c;frpidr  the  default  collating  sequence  and  insure  that  a program 
utilizes  the  cor  standard  COBOL  collating  sequence  include  a 'U' 
FAPAMCIER  pn  ThP  CQPOL  control  card. 


SXA“PLS COBOL (U) 

COBOL ( I=LGN,LR, U) 
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ALL  7/fl/Q  CARDS  ON  THE  INPUT  FILE  ARE  CONSIOERED  TO  BE  ENO-OF-FIlE 
r-aoKPRS  BY  COBOL  VERSION  4.  PREVIOUS  VERSIONS  WOULD  CONSIDER 
CNLY  a 7/n/q  WITH  A LEVEL  1^  AS  AN  END-OF-FILE. 

9.  SCOPE  7.7  aLLOWED  THF  COBOL  PROGRAMMER  TO  READ  FROM  FILE  INPUT  AND 
WRITE  TO  FILE  OUTPUT  WITHOUT  REOPENING  THEM  AFTER  EXECUTION  OF  A 
COBOL  CLCSF  STATFMFNT.  TO  USE  A FILE  THAT  HAS  BEEN  CLOSED  UNDER 
COBOL  VERSION  4 ANOTHER  OPEN  STATEMENT  IS  REQUIRED., 

10.  SCOPE  I. 3 VERIFIED  ALL  SUBSCRIPT  VALUES  TO  BE  IN  THE  RANGE  OF  THE 

WORKING  STORAGE  AREA.  WHEN  A SUBSCRIPT  WAS  OUT  OF  RANGE,  THE 
ETAGNOSTIC  negative,  7EPO,  OR  HUGE  SUBSCRIPT  WAS  ISSUED  AND  THE 
SOURCE  LINE  CAUSING  THF  ERROR  WAS  INDICATED  THEREBY  TERMINATING  THE 
RUN.  UNDFR  NOS/BF  1.0  NO  SUBSCRIPT  VALUE  CHECKING  IS  DONE  UNLESS 

OB  IS  SELPCTED  ON  THE  COBOL  CONTROL  CARO.  WHEN  DB  IS  NOT  SELECTED, 

THE  PROGRAM  EXPCUTES  FASTER  BECAUSE  LESS  CODE  HAS  BEEN  GENERATED. 
HOWEVER,  NO  OB  CAN  LEAD  TO  UNDETECTED  ERRORS  IF  YOU  HAVE  RELIED  ON 
THP  SUBSCRIPT  diagnostic  MESSAGE  IN  THE  PAST.  A GOOD  IDEA  MIGHT  BE 

TO  RUN  WITH  DB  SELECTED  DURING  TEST  PHASE  AND  NOT  SELECTED  FOR  THE 

FPnOUCTTCN  RUNS. 

11.  FRFVTOUS  VERSIONS  OF  COBOL  MADE  NO  ATTEMPT  AT  INITIALIZING  WORKING- 
STORAGE  AREAS.  COBOL  VERSION  4 NOW  INITIALIZES  W ORKI NG-S TOR  AGE 
AREAS  WHICH  DO  NOT  HAVE  VALUE  CLAUSES  TO  BLANKS.  IF  A PROGRAM 
EXPECTS  AN  UNINITIALIZED  AREA  TO  CONTAIN  OTHER  THAN  SPACES  THE 
PROGRAM  MUST  EXPLICITLY  CAUSE  THAT  AREA  TO  CONTAIN  THE  CORRECT 
VALUE.  THIS  WILL  AFFECT  THOSE  USERS  WHO  WEPE  DEPENDENT  U^  jN 
SETCORE  TO  INITIALIZE  CORE  BEFORE  PROGRAM  EXECUTION. 

12.  UNCFP  SCOPE  3.3  WHEN  A FIELD  BEING  MOVED  TO  A NUMERICALLY  EDITED 
field  contained  a NON-NUMERIC  CHARACTER  THE  MESSAGE  'NON-NUMERIC 

IN  FIELD  TO  BE  EDITED'  WAS  ISSUED  AND  THE  OPERATOR  GIVEN  THE  OPTION 
TO  GO  OP  DROP  THE  JOB.  UNDER  NOS/BE  1.0  THE  SAME  MESSAGE  IS  ISSUED 
FOR  this  condition  AND  THE  PUN  TERMINATED.  IF  FOR  SOME  REASON  THE 
RUN  MUST  BE  allowed  TO  CONTINUE  WITH  THE  NON-NUMERIC  ERROR,  AN 
•FF=NN'  PAPAMPTER  may  be  specified  in  the  EXECUTION  CALL  TO  ALLOW  A 
MAXIMUM  NUMBER  OF  NON-FATAL  EXECUTION  ERRORS.  WHEN  THE  COUNT 
SPECIFIED  BY  THF  INTEGER  IS  EXCEEDED  AND  AN  ERROR  OCCURS,  THE  RUN 
IS  TERMINATED. 

EXaMPLE--LGO(EF=10» 

13.  IN  COBOL  4,  THE  DECLARATIONS  'RECORD  CONTAINS  DEPENDING  UPON 
CATA-NAME*  AND  'OCCURS  DEPENDING  UPON  DATA-NAME'  ARE  NOT  ACCEPTABLE 
IF  THF  OATa-NAMC  IS  COMP-1  OR  COMP-2.  THE  DATA-NAME  MUST  BE 
NU»'FPIC  AND  MUST  BE  6 OR  FEWER  CHARACTERS  IN  LENGTH. 


i 
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XXXXSTE,CMin0000»T100,P2. 
CHARGF,XXXX, JJJJJJJJJJ. 
COPCL  (1-0  » 

LGP. 

• 7/n/q  FOP 

(COBOL  SOURCE  OFCKI 
' 7/fl'9  FOP 

(CflTA  DFCK  AS  NFEDFO) 

- 6/7/»^/q  EOF 


SAMPLE  COBOL  DECK  SETUPS  ••• 

COMPILE,  NO  LIST,  AND  EXECUTE 

NAME  / CODE 


••  L=0  SUPPRESSES  SOURCE  LISTING 
*•  LOAO  AND  EXECUTE  FROM  FILE  *LGO' 


COMPILE,  PUNCH  BINARY  DECK  AND  EXECUTE  USING  A DATA  TAPE 

XXXXST?,CM100000,T100,MT1.  NAME  / CODE 

CH APGE ,XXXX, J JJJJ JJJJJ. 

COBOL  (P  = PUNCHR)  •*  SE<^  COBOL  CARD  OPTIONS  ABOVE 

L ABEL,CAT AIN,R,D=HY,L  = XXXXDATAir,VSN=CB7  7 77,NORING. 

PUNCHB. 

• 7/>»/q  FOi^ 

(COBOL  SOURCE  DECK) 

• 7/fl/q  FOR 

(CATA  DECK  AS  NFBOFO) 

" 6/7/')/q  EOF 


load  and  execute  from  file  ’PUNCHB* 


XX 

X xs 

T7,C 

M61  0 

CO,TBOO,pB. 

CH 

APG 

f^.xx 

XX, JJJJ JJJJJJ. 

C.B 

“CL 

• 

CO 

BEL 

(SUB 

) 

CO 

POL 

,SUS 

• 

LG 

0. 

* 

7 

/p/q 

EOP 

(COBOL 

Mai 

N PonCPA**  S' 

• 

7 

/p/q 

for 

(COBOL 

PIP 

ST  SURPROGR, 

, 

7 

/*i  /q 

FOR 

(C 

0^01. 

Oro 

ONO  SUBPPOr.i 

, 

7 

/«/q 

FOR 

(C 

AT  a 

CBCK 

AS  NSFOBD) 

“ 

6 

77/P 

/q 

rqp 

compile  AND  EXECUTE  WITH  SUBPROGRAMS 

NAME  / CODE 

**  COMPILE  MAIN  PROGRAM 
**  COMPILE  COBOL  SUBPROGRAM 

••  LOAD  AND  EXECUTE  ENTIRE  OBJECT  PROGRAM 
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COMPILE, 

yXXXSTl,CM100000,T100. 
CHARGE, XXXXtJJJJJJJJJJ. 
RECUE5T,BINLI5,*PF, 

COPCL (P=PTNLTR) 

CAT  ALOr.(  PINLIB, DAY  ACCOUNT 
BINLIB. 

• 7/e/q  FOR 

(COPOL  SOURCE  DECK) 

• 7/«/q  FOR 

(CATA,  as  NFEOFO) 

E/7/«/q  EOF 


CATALOG  OBJECT  CODE,  EXECUTE 

NAME  / CODE 

•*  GET  SPACE  FOR  PERMANENT  FILE 
**  COBOL  OUTPUT  TO  FILE 
,ID=XXXX ,XR=ROONLY,PW=POONLY) 

»»  LOAD  AND  EXECUTE  FILE 


EXECUTE  CATALOGED  OBJECT  CODE 

XXXXCBA,CM100000,P2.  NAME  / CODE 

CH ARGF,XXXX, JJJJJJJJJJ. 

ATT ACH, DAY  AC, DAY ACCOUNT, in=XXXX. 

DAY  AC. 

• 7/P/9  FOR 

rCATA,  AS  NFFOFD) 

" 6/7/B/9  EOF 
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OVERLAY  FOP  COBOL 


THE  'SEGMENTATION*  FEATURE  OF  COBOL  IS  A MEANS  OF  OVERLAYING 
PROCEDURE  DIVISION  CODE.  WHILE  THIS  IS  EASY  TO  ACCOMPLISH,  THE  MAJOR 
ni’-ACVANTAGE  IS  THAT  NON-PROCEOURE  DIVISION  PORTIONS  OF  SUBROUTINES 
CANFCT  BE  OVERLAYEO.  HENCE  THE  (0,0)  LEVEL  CONTAINS  THE  DATA  DIVISION 
OF  THE  MAIN  AND  ALL  SUBROUTINES.  TO  MORE  EFFICIENTLY  UTILIZE  CORE 
STORAGE,  FORTRAN  OVERLAY  TECHNIQUES  ALLOW  OVERLAY  OF  WHOLE  SUBPROGRAMS. 


GIVEN  A MAIN  PROGRAM  AND  TWO  SUBPROGRAMS  IN  COBOL,  AN  EFFECTIVE 
OVERLAY  IS  CREATED  BY  ADDING  TO  THE  MAIN  LINK  A FORTRAN  SUBROUTINE  TO 
CALL  THE  OVERLAYS,  AND  ADDING  TO  EACH  OVERLAY  LEVEL  A DUMMY  MAIN  FORTRAN 
PROGRAM.  COBOL  CANNOT  BE  USED  FOR  THE  DUMMY  MAIN  PROGRAM  IN  A LEVEL. 

AS  lcng  as  the  fortran  segments  of  the  program  do  no  file  manipulation 

OR  ARITHMETIC  OPERATIONS,  NO  CCOMMON  OR  FILE  EQUIVALENCE  IS  REQUIRED. 
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COMPIL*’  WITH  SUBROUTINES  AND  OVERLAY 
USERTPY,r;MB1000,T?00.  NAME  / COOE 

CH  ARr,F,USER,  JJJJJJJJJJ, 

COPYPriNPUT,LGO,C)  ** 

noocL.  ** 

FTN.  ** 

FTN. 

COPCLISUPJ  ♦* 

FTN.  ** 

COPCL(SUB) 

LOO. 

• 7/n/B  EOR 

ovfplayioon,o,o) 

• 7/0/9  EOR 

COBOL  SOURCE  PECK  WHICH  CALLS  FORT 

• 7/»/9  EOR 

SUBROUTINE  FORT 

C FORTRAN  PROGRAM  MUST  NOT  00  ANY  I/O,  MERELY  CALL  OVERLAYS. 

CALL  OVERLAY  C3HDON,1,0) 

CALL  OVERLAY  (3HOON,2,0) 

RETURN 

END 

• 7/fl/q  EOR 

OVERLAY (DON, 1,0  ) 

PROGRAM  FORTl 
CALL  SUBl 

C FORTRAN  MAIN  MUST  DO  NO  I/O  OR  ARITHMETIC 

PNO 

• 7/8/R  EOR 

COBOL  SUBPROGRAM  1 

• 7/»</q  EOR 

overlay (DON, ?,0 I 

PROGRAM  F0RT2 
CALL  SUB2 
END 

• 7/A/q  EOR 

COBOL  SUBPROGRAM  2 

• 7/A/q  EOR 

fOATA,  AS  NEEDED! 


INSERT  FIRST  OVERLAY  CARO 

COMPILE  COBOL  MAIN  PROGRAM 

COMPILE  FORTRAN  SUBROUTINE 

COMPILE  DUMMY  MAIN  PROGRAM  WITH  OVERLAY 

COMPILE  FIRST  SUBROUTINE 

COMPILE  DUMMY  MAIN  PROGRAM  WITH  OVERLAY 
COMPILE  SECOND  SUBROUTINE 
LOAD  AND  EXECUTE 


E/7/R/q 


EOF 
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COBOL  5 

C0B0L5,  WHICH  IS  CDC'S  IMPLEMENTATION  OF  THE  1974  ANSI  COBOL 
STANCARO,  IS  AVAILABLE  AS  A PERMANENT  FILE  ON  ALL  THREE  6000  COMPUTERS. 
C0B0L5  IS  IN  ADDITION  TO,  BUT  DOES  NOT  REPLACE,  THE  CURRENT  SYSTEM 
COBOL.  ALMOST  ALL  COBOL  4 PROGRAMS  MILL  NEED  SOME  CONVERSION  TO 
COMPILE  IN  COBOL  5.  COMPILATION  IN  COBOL  5 IS  CONSIDERABLY  SLOWER. 
EXECUTION  MAY  BE  MUCH  FASTER,  PARTICULARLY  WHERE  SORTING  IS  INVOLVED. 


CONTROL  CAROS  FOR  NOS/BE  AREI 

...  AT  LEAST  CM65000  ON  JOB  CARD 

• • • 

ATTACH,C9L,434C080L5,I0=CSYS. 
LIBRARY, CBL. 

COBOL5,<OPTIONS>. 

LGO. 

• 7/8/9  EOR 

(COBOL  5 SOURCE  PROGRAM) 

••  6/7/8Z9  EOF 


CAUTION!  WHEN  USING  C0B0L5  FROM  A USER  LIBRARY  (AS  ABOVE),  IT  IS 
NECESSARY  TO  ATTACH  THE  LIBRARY  EVEN  WHEN  EXECUTING  FROM  AN  ABSOLUTE 
CORCLS  OBJECT  FILE.  USE  THE  SAME  LFN  FOR  THE  LIBRARY  WHEN  COMPILING 
AND  EXECUTING,  E.G., 

ATTACH, MYPROG,IO=XXXX.  •*  GET  ABSOLUTIZED  PROGRAM 

ATTACH,CBL,434C0B0L5, ID=CSYS.  ♦*  GET  C0B0L5  LIBRARY 

MYPROG.  •*  EXECUTE  PROGRAM 
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CONTROL  CARD  PARAMETERS 

THE  PARAMETERS  AVAILABLE  ON  THE  C0B0L5  CONTROL  CARD  DO  NOT  ALL 
CORRESPOND  TO  THOSE  USED  BY  COBOL  4.  IN  THE  DISCUSSION  BELOW,  SOME 
OF  THE  PARAMETERS  HAVE  TWO  DEFAULTS.  THEY  WILL  BE  SHOWN  AS 
(OEFAULTt  DEFAULT1/0EFAULT2)  WHERE  DEFAULTl  IS  WHEN  THE  KEYWORD  IS 
OMITTED  AND  DEFAULT?  IS  WHEN  THE  KEYWORD  IS  GIVEN  ALONE.  FOR  EXAMPLE, 
THE  DEFAULTS  FOR  THE  •!*  OPTION  ARE  INPUT/COMPILE.  THIS  MEANS  THAT 
WHEN  THE  *1'  PARAMETER  IS  OMITTED  ( C0B0L5 ,....» , THE  DEFAULT  IS  ‘INPUT* 
AND  WHEN  THE  *1*  PARAMETER  IS  GIVEN  ALONE  IC080L5, I ,....) , THE  DEFAULT 
IS  ‘COMPILE*.  SOME  OF  THE  MORE  FREQUENTLY  USED  PARAMETERS  ARE* 


-QEim.  flCIIQU 

B=LFN  FILE  TO  CONTAIN  RELOCATABLE  BINARY  OBJECT  PROGRAM 

(DEFAULTS*  LGO/BIN) 

USE  B=D  TO  SUPPRESS  BINARY  OUTPUT 

I=LFN  FILE  CONTAINING  SOURCE  PROGRAM  (DEFAULTS*  INPUT/COMPILE) 

L=LFN  FILE  TO  CONTAIN  COMPILATION  LISTINGS 

(DEFAULTS*  OUTPUT/LIST) 

USE  L=0  TO  SUPPRESS  THE  LISTING 

LO=  LISTING  OPTIONS 


M - STORAGE  MAP 

0 - OBJECT  CODE  LISTING  (USE  ONLY  IF  REQUESTED  BY 
CODE  1892) 

R - CROSS-REFERENCE  LIST 
S - LIST  SOURCE  PROGRAM 

WHEN  MORE  THAN  ONE  IS  SPECIFIED,  SEPARATE  THEM  WITH  /, 
E.G.,  LO=M/S.  (DEFAULTS*  S / *M/R/S‘) 

PO=  PRINT  DENSITY.  3,  4,  6,  OR  8 LINES/INCH  MAY  BE  SELECTED. 

(DEFAULTS*  6/8) 

SY  SYNTAX  CHECK  ONLY.  DO  NOT  PRODUCE  OBJECT  CODE. 

CUTS  COMPILATION  TIME  ROUGHLY  IN  HALF. 

SEE  C0B0L5  REFERENCE  MANUAL,  CHAPTER  12,  FOR  ADDITIONAL  OPTIONS. 


CONTROL  CARD  EXAMPLES 

C0R0L5.  DEFAULTS  TO*  I=INPUT,L=OUTPUT,LO=S,B=LGO 

SOURCE  PROGRAM  FROM  FILE  ‘INPUT* 

COMPILATION  LISTING  ON  FILE  ‘OUTPUT* 

SOURCE  LISTING  SELECTED 

RELOCATABLE  BINARY  OBJECT  CODE  ON  FILE  ‘LGO* 

C0B0L5(I=INP,L=0UTP,L0=M/0/R/S,SY,PD=8) 

SOURCE  PROGRAM  IS  ON  FILE  ‘INP* 

COMPILATION  LISTING  ON  FILE  ‘OUTP* 

LIST  OPTIONS  M,  0,  R,  S SELECTED 
SYNTAX  CHECK  ONLY  (NO  BINARY  OUTPUT) 

PRINT  DENSITY  IS  8 LINES  PER  INCH 
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COBOL  5 VERSUS  COBOL  4 

COBOL  4 AND  COBOL  5 HAVE  SUBSTANTIAL  DIFFERENCES  BECAUSE  THEY 
HERE  OFSTCNEO  TO  COMPLY  WITH  DIFFERENT  VERSIONS  OF  THE  ANSI  COBOL 
STANCARO.  A GOOD  CONDENSED  LIST  OF  THE  MAJOR  DIFFERENCES  IS  GIVEN 
IN  CHAPTER  1 IN  THE  C0B0L4  TO  C080LS  CONVERSION  AIDS  REFERENCE  MANUAL. 
AMONG  THESE  DTFFFR'^NCFS  APFt 

DUPLICATE  KEYS  ARE  NO  LONGER  ALLOWED  FOR  INDEXED  SEQUENTIAL 
FILES. 

USER-OFFTNFn  LABELS  ARE  NO  LONGER  ALLOWED. 

SKIo  VERB  HAS  BEEN  DELETED. 

EXAMINE  VERB  HAS  BEEN  REPLACED  BY  INSPECT. 

string,  UNSTRING,  MERGE,  AND  INITIALIZE  HAVE  BEEN  ADDED. 

COLLATING  SEQUENCE  CONTROL  HAS  BEEN  EXPANDED  AND  MAY  BE 
DYNAMICALLY  CONTROLLED. 

character  CODF  conversion  can  BE  SPECIFIED  FOR  A TAPE  IN  UNIVAC 
fieldata  format. 


RRFFRENCESJ  COBOL  B REFERENCE  MANUAL  COC  60497100 

COBOL  4 TO  COBOL  5 CONVERSION  AID  CDC  192650Z1A 
FEDERAL  INFORMATION  PROCESSING  STANDARDS,  DEC  1975, 

f’UBLTCATION  NUMBER  ?1-1  (GIVES  INFORMATION  REGARDING 
FEDERAL  GUIDELINES  FOR  USING  ANSI  74  COBOL  COMPILER) 


I 
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COnOLU  TO  rCPOL5  CONVERSION  AID 


A rONVFPSTON  AIO  PROGRAM  IS  AVAILAPLF  TO  ASSIST  IN  CONVERTING 
PPPGPAMS  FPOM  COOOLU  TO  COROLS.  THF  PETAILFD  OFSCPIRTION  QP  ITS 
OPERATION  IS  FOUND  IN  *CORCL  VERSION  <♦  TO  COBOL  VERSION  5 CONVERSION 
AIO'  RFFERFNCF  manual  (CDC  PURLICATION  no.  19?f>S0?l). 

FTFLC  LPNCTH  PEOUIPFDl  77000  CM  WORDS. 

TAPEll  IS  THF  DEFAULT  INPUT  SOURCE  TO  THE  TRANSLATOR. 

TAPE2S  IS  THP  DEFAULT  CONVERTED  OUTPUT  FILE. 

COBCL  COPY  LIBRARIES  MUST  BE  CONVERTED  VTA  A SPECIAL  ROUTINE 
(SEE  CPLCOP  CONTROL  CARO  TN  CONVERSION  AID  REFERENCE  MANUAL). 

EXAMPLE  1.  CONVERT  SOURCE  DECK  ON  CAPOS  AND  CALL  COBOLS  FOR  COMPILE. 

NAME  / CODE 


••  COPY  INPUT  CAPOS  TO  FILE  TAPEll 

*•  ATTACH  CONVERSION 
PROGRAM  FILES  AND 
EXECUTE  (INPUT  ON  TAPEll) 


* » 


JOPNAME,CM77000 

charge, ... , 

COPYCR,INPUT,T APEll. 

REWIND, TAPEll. 

ATTACH,LCS,ID=CSYS. 

ATTACH,TAPE10,LCSYNTAX, ID=CSYS. 

LCS. 

REWIND, TAPE2S. 

ATT ACH,CRL,434C080L5,TD=CSYS. 

LIBRARY, CBL. 

C0P0L5 (I=TAOE2S) 

• 7/R/q  FOR 

C0B0L4  SOURCE  DECK 

* 7/8/9  FOR 

UPD,CBLLTST  (LISTS  ALL  C0B0L4  SOURCE) 

CBL 

~ 6/7/8/B  FOE 


example  2.  PROGRAM  TO  BE  CONVERTED  IS  ON  AN  UPDATE  PROGRAM  LIBRARY. 
TRANSLATE  AND  CCMPILE. 


ATTACH  COBOLS 
*•  LIBRARY  AND 
••  CALL  COBOLS 


JO“ 

NAME, CM770 

0 0 t • • • • 

CM  A 

PG  F f « • • • 

ATT 

ACH,OLDPL, 

• • • • 

UPD 

ATE(O) 

ATT 

ACH,LCS, TO 

= CSYS. 

ATT 

ACH,TAPF10 

,LCSYNT 

AX, TD=CSYS. 

LCS 

, COMPILE, 

PEW 

IND, TAPE2S 

• 

ATT 

ACH,CBl  ,43 

4C^BOLS 

, ID=CSYS. 

1 IR 

PAPY,CBL. 

COP 

OLS ( I=TAPE 

0 

7/8/9 

FOR 

*CC 

MPILP  DEC 

KNAMF 

0 

7/8/9 

FOP 

UPD 

,CBLLIST 

CBL 

•« 

E./7/8/9 

EOF 

** 

. 

NAME  / CODE 

SELECT  A DECK  TO  BE  TRANSLATED 


**  CONVERT  SELECTED  PROGRAM  (FROM 
COMPTLE) 
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cYflvpLf  cnNVFPT  SOIJOCF  PROGPaM  FROM  UPDATE  PL  AND  CREATF  NEW  PL. 

jOONAMF,CM770PO,....  name  / CODE 

rHAPGF, . . . . 

PFCL'F':  r,  NFWPL  , *PF  . 
eTTACH.OLDPL,.... 

•J'^OAT'- (0,  s=TAPFll,n  = 0)  SELECT  DECK  (♦  'DECK  CAPO)  TO 

t'NLOAD.nLDPL.  RE  CONVERTED 

PFWIN'D.TAOFil, 

AT  1 aCH,LCS,ID  = CSYS. 
flTTncH.TAPEio.LCSYNrav^in^cSYS. 

LCS. 

REWIND, TA"E?5. 

UPDATE  ( I=TAPF?5,N)  **  SEE  NOTE  3EL0W 

catalog.nfwpl,.... 

• 7/8/q  EOR 

♦compile  deckname 

• 7/8/q  FOR 

UPO,C«LLrST 

CRL 

” 5/7/8/q  EOF 

UPDATE  WTIL  CREATE  NEW  PL  OF  TRANSLATED  DECK.  THIS  WILL  BE  THE 
DNl  Y SOURCE  DRCK  FROM  THE  OLOPL  TO  APPEAR  IN  THE  NEWPL. 
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♦***♦  UTILITIFS  ***** 

fl  WIOF  va^IFTY  OF  UTILITY  PPOGOflME  IS  flVaiLaBLF  flj  PflPT  OF  THF 
SYSTEM  OP  IN  LIPPaPTFs  OR  OTHER  FIL'^S.  THIS  CHAOTFR  OESCRIRIS  MANY  OF 
THF  SYSTEM  UTILITIES  (NO  ATTACH  RFOUIRFO).  SEE  CHAPTER  10,  CCLI9  AMD 
CCLIP/U  FOR  aODITinNAL  UTILITIES. 

utility  operations  can  DE  performed  with  NAMED  FILES,  FflCH  ASSIGNED 
TO  a SPECIFIC  PERIPHERAL  DEVICE  (MAY  NEED  REQUEST  CARDS  WHICH  MUST 
PPECEDE  THE  UTILITY  CONTROL  CARDS).  “OST  COPY  UTILITIES  USE  A FIELD 
LENGTH  OF  ?0000.  ALL  N0S/9F  UTILITIES  DESCRIBED  BELOW  ARE  FOR 
sequential  FILES  ONLY.  SIS  FILES  APE  MANIPULATED  BY  COPYBE  OR  FORM. 

FOP  RANDOM  FILES,  SEE  FORM!  SEQTDRAN  DIRECTIVE  OF  EDITLIB  (CCRM,  7-11); 
COPYE  (CCRM,  6-4)1  COPYS  (CCRM,  10-^l):  CDPYBFR  (CCPM,  10-21). 


COPYPM  (CCPM,  6-8)  MftY  RF 

USED  TO 

COPY  MOST 

FILES. 

NOS/BE 

UTILITIFS 

« , , 

SEE  NOSBE,  CHAPTER  4,  AND  SCOPE,  CHAPTER 
OF  THE  FOLLOWING  UTILITIES. 

8,  FOR 

A FULL  DESCRIPTION 

COPYCE (FILIN,FTL0UT,N) 
C0PYPF(FILIN,FIL0UT,N) 

COPY 

COPY 

CODED 

BINARY 

FILES 

FILES 

COPYCR (FILIN, FIL0UT,N) 
C0PYER(FTLIN,FIL0UT,N) 

COPY 

COPY 

CODED 

BINARY 

RECORDS 

RFCOPDS 

FILIN  - INPUT  FIL*" 
FILOUT  - OUTPUT  FILE 

(DEFAULT! 

(DEFAULT! 

INPUT) 

OUTPUT) 

N - NUMBER  OF  eilFS  OR  RECORDS  (DEFAULTl  1) 


SKIFF(FILF,N, LEVEL, TYPE)  SKIP  FORWARD 

SKTPP(FILE,N, LEVEL, TYPE)  SKIR  BACKWARD 

FILE  - NAME  OF  FILE  TO  BE  POSITIONED 
K - NUMBER  OF  RFC ORDS/F IL ES  TO  BE  SKIPPED 

LEVEL  - END-OE-PECORD  LEVEL  NUMBER 

0 OR  OMITTED  - NORMAL  SNO-OF-RECORO 
17  - END-OF-FILE 

TYRE  - ONE  OF 

C CODED  FILES  (Y-TPACK,  EVEN  PARITY) 

8 BINARY  PILES  (7-TRACK,  ODD  PARITY) 


UN'F  IP  7? 
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CFiPVL(nLnLTP,niM.APY,NFWLIP)  SFLECTIVE  REPLACEMENT  OF  ROUTINES 

CCPVL  (CLOLin,  PINAPY  .NEWLIB.L  AST,FLAr.) 

CO PYLMfOL OLIO, binary, NEWLT0) 

COPYLM (nLnL!P,BTNAOY,NEWLTB,LAST,FL AG) 

CLPLTB  - OLO  MASTER  BINARY  (DEFAULT)  OLD) 

PIK’APY  - PFPLACFMFNT  FILE  (DEFAULT)  LGO) 

NPWLTB  - CREATE  UPDATFD  MASTER  FILE  (DEFAULT)  NEW) 

LA'-T  - NAME  OF  LAST  PFCOPD  DN  OLOLIB  TO  BE  PROCESSED. 

(DFFAULT)  all  records  on  OLOLIB  ARE  PROCESSED) 

FLAG  - 5R0C'‘SSTNG  OPTIONS  (DEFAULT)  OPTION  NOT  SELECTED) 

P REWIND  OLDLTB  AND  NEHLIB  BEFORE  PROCESSING 
(BINARY  TS  ALWAYS  REWOUND  BEFORE  AND  AFTER) 

A APPEND  TO  END  OF  NEWLTB  ALL  BINARY  RECORDS  THAT  DID 
not  match  any  OF  DLDLIB. 

TO  USE  BOTH  P AND  A OPTIONS  COMBINE  THE  LETTERS  ~RA“ 

ODPYL  PROCESSES  THE  MASTER  FIL^  (OLOLIB)  FORWARD  ONLY,  BUT  HILL 
search  binary  and  replace  all  routines  of  the  same  name  from  their 

FIRST  OCCURRENCE  pN  OLOLIB. 

OOF  LM  DIFFFod  only  IN  ITS  HANDLING  OF  MULTIPLE  OCCURRENCES  OF  A 
PPtORD  ON  the  old  master.  USING  COPYLM,  ALL  OCCURRENCES  OF  THE 
PCUTTNE  ON  OLDLTB  ARE  REPLACED  BY  THE  FIRST  MATCHING  RECORD  ON 
BINARY.  THIS  '■ACILITATFS  RFF;.5CING  A SUBROUTINE  WHICH  OCCURS  IN 
'■everal  overlays. 


TTr«T7i(LFN>  LIST  CONTENTS  OF  BINARY  FILE 

TTPM7F  (LFN,<pARAHFTFPC>) 

CUTP|;r  TNPLUDFS  pFCORO  NUMBER,  NAME,  LENGTH,  PREFIX  TABLE  F CR 
pficcATABLE  binary  OR  USER  LIBRARv.  POR  SEQUENTIAL  PL,  ONLY  DECK 
^AMES  ape  LISTEO.  (SEE  CGRM,  7-10)  CONTENT’, 

ccLTB/o)  listbin; 

CCUPM,  3-?) 

noTTONAL  nAPAMrT<^PS  INCLUDE) 

F - LIST  Entpy  POTNTF  fop  PFLOCATABLF  programs  OR  TOFNTS  FOR 

S«^QUFNTIAL  PL 

L=LFN  - IF  other  than  "OUTPUT” 

N - ITFMT7F  TO  ENO-OE- INFORMATION 

B=N*’  - ITFMI7P  MN  files  (DFFAIILT)  1) 


I 
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COPYN  (FI  , riLOIJT.FILINl,  , FILTNN)  COPY,  MFPGF  OR  SCLFCT  LOGICaL 

RFCOPOS  FRO*^  UP  TO  10  BINARY 
INPUT  FILFS. 

THFRF  APR  NO  APGUMFNT  OFFAULTS. 

FI  IG  PFCORO  FORMftTl  IJSF  0 (7FPO). 

FTLOUT  THF  OUTPUT  FILF  PPFCFnEG  ALL  INPUT  FILFS. 

THF  TFXT  logical  RFCOPO  WHICH  CONTAINS  RFCORO  lOFNT IFICA T ICN 
CAROS  WILL  BF  FILF  'INPUT*.  COMMAND  SUMMARY  WILL  BE  IN  'OUTPUT*. 

the  RFCOPO  inFNTTFTCATTON  CAROS  BEGIN  IN  COLUMN  1 AND  HAVE  THE 
FOLLOWING  format:  p1,P?,p3 

WHFPF  R1  IS  RECORD  NAME  OP  NUMPFP,  RELATIVE  TO  CURRENT  POSITION, 
TO  START  COPY 

R?  IS  LAST  RFCORD  NAME  OF  A SET  OR  TOTAL  NUMBER  OF  RECORDS 
TO  BE  COPIED.  IE  BLANK,  COPY  ONLY  PI 
IE  COPY  THRU  END  OF  FILE. 

PS  IS  name  op  input  FILF  TO  SEARCH  (MAY  BE  OMITTED) 

RFCORD  IDENTIETCATION  CARDS  MUST  BE  BLANK  (THRU  COLUMN  RO) 
FOLLOWING  the  LAST  SPECIFIED  PARAMETER. 

several  FILF  MANIPULATION  COMMANDS  ARE  ALSO  ALLOWED. 

SEARCH  IN  ORDER  OF  ROUTINES  ON  EILR  WHEN  POSSIBLE.  COPYN  WILL 
END  AROUND  SEARCH,  SO  IS  COSTLY  IF  MANY  REWINDS  ARE  REQUIRED. 


BKSP,LFN.  POSITION  READY  TO  READ  LAST  PREVIOUS 

logical  PFCORO.  IF  FILE  WAS  AFTER  EOF, 
POSITION  JUST  BEFORE  THE  EOF. 


C0MPINE,ETLE1,ETLE?,N.  remove  LOGICAL  RECORD  BOUNDARIES  FROM  FIRST 

N RECORDS  ON  EILEl,  MAKING  ONE  LOGICAL 
RECORD  ON  FILE?  (BINARY). 


COMPARE, FILEI, FILE?.  VERIFY  THAT  A COPY  IS  ERROR  FREE. 

COMPARES  RECORDS  FROM  CURRENT  POSITION 
WITH  ADDITIONAL  OPTIONAL  PARAMETERS  TO 
CONTROL  NUMBER  QE  RECORDS  AND  NO  OF  ERRORS. 
NOTE:  DISK  files  SHOULD  NOT  BE  COMPA'^pD 
WITH  TAPE  FILES  USING  THIS  UTILITY  BECAUSE 
FPRONEOUS  'BAD  COMPARE'S  CAN  OCCUR. 


CnFY,FILFl,F ILF3.  COPY  TO  DOUBLE  ENO-OF-EILE  (OR  END-OE- 

INFORMATION,  IE  ENCOUNTERED  FIRST).  (FOR 
A BETTFP  ROUTINE,  SEE  CCRM,  6-4t  COPYE) 
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OTHFP  UTILITIFS  *** 

THF  FOLLOWING  UTTLITTEG  MEPF  ORTAINFO  FROM  THE  UNIVERSITV  OF 
WASHINGTON  AND  HAVE  RFFN  MAOE  A PART  OF  THE  DTNSROC  6000  COHPUTER 
OPERATING  systems  (NO  ATTACH  REOUIPEn)!  COPYE,  COPYF,  COPYP,  COPYPM, 
COPYSF/COPYSBF/COPYSR  (WHICH  REPLACES  AND  EXPANDS  THE  CDC  VERSION  OF 
COPYSPF).  FULL  DOCUMENTATION  MAY  RF  ORTAINED  BY  USING  THE  FOLLCWING 
CONTROL  CAROI 

REGIN,UTILTTY,,PPOGDOC,OTHEP,,*tOUTPUT. 

WHERE  * IS  ONE  OF » COPYF,  COPYF,  COPYR,  COPYPM,  COPYSF. 

I 

• TO  PRINT  several  DOCUMENTS,  USEt 

BEGIN, UTILITY,, MANY  DOC, other,, INPUT, OUT PUT. 

WHERE  FILE  'INPUT'  CONTAINS  THE  DESIRED  DOCUMENT  NAMES,  ONE  PER  CARO. 


COPYF(FTLIN,FTLOUT)  MAKE  AN  EXACT  COPY  FROM  CURRENT  POSITION 

TO  END-OF-INFORMATION 

THERE  APE  NO  DEFAULT  FILE  NAMES. 

IF  FILIN  IS  RANDOM  AND  IF  FILIN  AND  FILOUT  ARE  DISK  AND  APE 
REWOUND,  THEN  FILOUT  IS  RANDOM. 

MODE  SWITCHING  WILL  OCCUR  IF  A PARITY  ERROR  OCCURS  IN  THE  FIRST 
PPU  OF  FILIN. 

FILOUT  IS  BINARY. 

THIS  IS  THF  easiest  WAY  TO  PRODUCE  AN  EXACT  COPY  OF  AN 
ARBITRARY  NOS/BE  FILE. 

THIS  IS  THF  fastest  WAY  TO  COPY  D I SK- TO-D I SK . 
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COPYF (FTL IN,FILOUT,N) 

COPY 

N 

FILES 

COPYF ( FILIN, FILOUT, N,C) 

COPY 

N 

CODED 

FILES 

C0PYR(FILIN,FIL0UT,N,LEVEL) 

COPY 

N 

RECORDS 

COPYP(FIL IN,FTLOUT,N,LEVEL,C) 

COPY 

N 

COOED 

RECORDS 

COPYF 

( , FILOUT, N) 

WRITE 

N 

EOF'S 

COPYF 

(, FILOUT, N,C) 

WRITE 

N 

CODED 

EOF'S 

COPYR 

(, FILOUT, N, LEVEL) 

WRITE 

N 

EOR*S 

COPYR 

(, FILOUT, N, level, C) 

WRITE 

N 

CODED 

EOR'S 

FILIN 

FILOUT 

N 


C 

LEVEL 


INPUT  FILE  (NO  OEFftULn 
OUTPUT  FILE  (NO  OEFAULT) 

NUMBEP  OF  FILES/PECORDS  TO  COPY  OR 
NUMBER  OF  EOF/EOR  TO  WRITE 
(DEFAULT*  1> 

COPY  COOED  FILES/RECOROS  OR 

WRITE  CODED  EOF/EOR 

EOR  LEVEL  NUMBER  (OCTAL) 

(DEFAULT*  0) 

(COPYR  ONLY.  IF  USED,  N MUST  ALSO  BE  USED.) 


THERE  ARE  NO  DEFAULT  FILE  NAMES. 

NOS/BE  files  only.  NO  S OR  L TAPES. 

FOR  COPYF,  IF  EOI  IS  ENCOUNTERED  WITHOUT  EOF  JUST  BEFORE  IT,  AN  EOF 
IS  ADDFO  TO  FILOUT. 

FOR  COPYR,  IF  LAST  RECORD  WRITTEN  WAS  OF  A LEVEL  LESS  THAN  THE 
SPECIFIED  LEVEL,  A ZERO-LENGTH  RECORD  OF  THF  SPECIFIED  LEVEL  IS 
WRITTEN. 

FOR  COPYR,  A RFCORD  LEVEL  MAY  NOT  BE  SPECIFIED  WITHOUT  A RECORD 
COUNT. 


MESSAGES 


BCD 

MODE  FILE  M 

COPYR 

COPYF 

TAPE  MODE  SWITCHED  TO  CODED 

BIN 

MODE  FILE  M 

COPYR 

COPYF 

TAPE  MODE  SWITCHED  TO  BINARY 

EOF 

FNCOUNTFRFO 

CORYR 

COPYR  STOPS 

FOI 

ENCOUNTERED 

COPYR 

COPYR  STOPS 

EOI 

FNCOUNTPRED-M  FILES 

COPYF 

M-TH  FILE  ENDED  WITH  EOF, 
FOLLOWED  BY  EOI.  COPYF  STOPS 

EOI 

FNCOUNTPRFD-FILE  M 

COPYF 

M-TH  FILE  ENDED  WITH  EOI, 
without  EOF.  EOF  ADDED  TO 
FILOUT.  COPYF  STOPS. 
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COPY  PM (FILIN, EIL0UT,N1 


P ILTN 

FILOUT 

N 


INPUT 

OUTPUT 


COPY  ANO  CONVEPT  PECOPOS  ON  SEOUENTIAL 
(SO)  FILES  FROM  ONE  RECOPD  TYPE  ANO  BLOCK 
STPUCT'JPE  TO  ANOTHER. 

FILE  (NO  DEFAULT) 

FILE  (NO  DEFAULT) 

BE  EXPRESSED  IN 
) t 

FND-OF-INF  ORMATION 
(PARTITIONS) 

LOGICAL  RECORDS  (SECTIONS) 


A CDUN 

T WHT 

C 

H 

MAY 

FOP 

MS 

(OEFA 

U 

L 

T ) IP 

EOT 

- 

COPY 

T 

0 

FNO- 

MF 

- 

COPY 

M 

FTLFS 

MR 

- 

SAMF 

A 

s 

MF 

HP 

- 

COPY 

M 

SYSTF 

MS 

- 

SAME 

A 

s 

MP 

M 

- 

SAME 

A 

s 

ME 

ANY  OF  THE  FOLLOWING 


•file*  capos  APF  used  TO  SPECIFY  CONVERSION  ANO  BLOCKING. 

COPYPM  IS  ESPECIALLY  CONVENIENT  FOR  READING  AND  WRITING  BLOCKED 
stranger  TAPES  (ROTH  7-TRACK  AND  9-TRACK). 

COPYPM  IS  VERY  FAST  FOP  TAPE  ANO  OTHER  CONVERSION  COPIES. 


COPY’^F  (FTL  IN,FTL0UT,N,PAPAHS) 
COPY  SR (FILIN, FIL DU T,N, PAR A MS) 


COPY  (SHIFTED)  FILES  (MAY  ALSO  BE 
CALLED  COPYSBF) 

COPY  (SHIFTED)  RECORDS 


FTLIN  - 
FTLOUT  - 

N 

PflRAMS  - 


INPUT  FILE 
OUTPUT  FILE 
(DEFAULT : 
number  of 


(MUST  BE  FIRST  PARAMETER)  (DEFAULT) 
(MUST  RE  SECOND  PARAMETER) 

OUTPUT ) 

FILES/RECORDS 


INPUT ) 


TO  BE  COPIED  (DEFAULT)  IS 


(USUALLY  THIRD  PARAMETER,  RUT  MAY  APPEAR  ELSEWHERE.) 
other  PARAMETERS  AND  OPTIONS  WHICH  MAY  FOLLOW  IN  ANY 
OROE®.  SOME  OF  THEM  ARE) 

IS  TO  RIGHT  (0-1T2)  (DEFAULT)  1) 

) IS  CODED 

PARITY  SWITCHING  OCCURS.  IF 
AT  START  OF  EACH  LOGICAL  RECORD  ON 


FOR  COPYSF/COPYSBF 
FOP  COPYSR 

L IS  LINE  LIMIT  (DEFAULT)  2000) 
-RECORD  ANO  END-OF-FILE  AS  *EOR  AND 
:TIVELY.  (DEFAULT)  LR  NOT  SELECTED) 
'JES  PER  INCH  OUTPUT 
) 6 LINES  REP  INCH  AT  END) 


THIS  I'^  AN  ADAPTATION  OF  THE  STANDARD  CDC  UTILITY  ‘COPYSBF*  WITH 
MANY  ADDTTTONAL  OPTIONS  AMD  C AP ART L T T I ES . IT  IS  USED  PRIMARILY  FOR 
LISTING  files  rut  CAN  RE  USED  AS  A GENERAL  PURPOSE  UTILITY.  (SEE 
rCLTR/P)  rOPYSF) 


SM 

- SHIFT 

M COL 

c 

- INITI 

AL  PEC 

(AUTO 

MATTC 

NFCES 

SAPY, 

TAPE 

FILES. 

POT 

- COPY 

TO  EOT 

FOE 

- COPY 

TO  EOF 

LC  = L 

- LINE 

COUNT, 

LP 

- LIST 

END-OF 

*FOE, 

PES°E 

Lfl 

- SELEC 

T « LT 

(PEST 

OPFO  T 

SPP  FULL  DOCUMEMTArTON,  TN  CCLTp,  FOR  ADDITIONAL  PARAMETERS 


JUNT  iq77 


PAGE  6-7 


SAMPLE  UTILITY  SETUPS 


COPY  pen  FROM  FILE  T TO  NEW  TAPE,  FILE  1 


USFPTAP,T?00,MT?.  NAME  / CODE 

CH APGEtUSPR, JJJJJJJJJJ. 

LA  PPL, SGM AST, L=USERM ASTER, W, D = H Y , T= 7, VSN  = C AOROO , R I NG . 
LAPEL,SGSHIP,L=USERSHIPS,R,n=HY, VSN=CA88fl«,NORI NG. 

COPYF(SCSHIP, NULL, 2,0  COPY  FIRST  ? FILES  TO  POSITION  TAPE 

RETURN, NULL. 

COPYF (SGSHIP,SGMAST,C)  COPY  THIRD  FILE  TO  A NEW  TAPE 

REWIND (SGSHIP,SGMAST)  WILL  PRINT  BLOCK  COUNT  WRITTEN 

*•  E/7/8/9  EOF 


ANCTHER  WAY  TO  SKIP  AHEAD  TWO  FILES 
SKIPF  (SGSHIP,?,17,0  INSTEAD  OF  COP  YF  ( SGSH  IP  , NULL  , ? ) 


MULTIPLE  INPUT  TO  FORTRAN  PROGRAM 


^ USFRTP3,CM50000,T400,P4.  NAME  / CODE 

CHAPGFtUSER, JJJJJJJJJJ. 

C0PYR(INPUT,TAPE2»  COPY  CAPOS  TO  FILE  CALLED  TAPE? 

REWIND, TAPE?.  REPOSITION  TAPE?  FOR  READING 

FTN. 

LGO, 

• 7/8/9  EOR 

(DATA  TO  BF  READ  FROM  TAPE?  IN  PROGRAM) 

• 7/8/9  FOR 

PROGRAM  MANIP  ( I NPUT , OU TPUT , T APE 2 , T A PE5  = I NPUT , T APE6=0UT PUT ) 

(FORTRAN  SOURCF  CARDS) 

• 7/8/9  FOR 

(DATA  TO  BE  READ  FROM  TAPE5) 

~ 6/7/8/B  EOF 


TAPE  TO  PRINT  - SINGLE  SPACE 


NAME  / CODE 

HY ,R,VSN=CA9999, NORING) 

COPY  SHIFTED  COOED  FILE 


USERPR,MT1,T100. 
CHARGE,USER, JJJJJJJJJJ. 
LAPEL (TAPED, L=USERSOURCF,n= 
CD PYSF, TAPED, OUTPUT, C. 


6/7/8Z9  EOF 
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REPLACE  SUPROUTINES  lU  RELOCATABLE  BINARY  ORO&RAH 

USFRCTE  ,CH50  000,T?00,MT?.  NA*iF  / COOF 

CHARGE, USER, JJJJJJJJJJ. 

ETN(P=RTNARY,OPT=l) 

REOUEBT,NEWLIB,*PE. 

ATTACH, OLnLIB,PROGPTN,Tn=XXXX,PW=RnONLY.  SEE  CCRH,  <,-17  FOP  CPFATF 

REWIKO, BINARY. 

COPYL(OLnLTB,BINARY,NPHLTB> 

NEHLIB.  EXECUTE  CORRFCTFO  FRF 

CAT ALOG,NEWLIB,PROGBIN, IO=XXXX, PW=PDONL Y, XR=ROOML Y . 

PUPGE,nLOLTB,  AFTER  CATALOG  OF  NEW  CYCLP,  P'JRGF  OLD  ONF 

• 7/«/9  FOR 

ICUBROUTINEC  TO  REPLACE  OLD  VERSION) 

• 7/P/q  FOP 

(DATA  ) 

~ f/7/')/P  FOE 


Rt^PLACE,  INSERT  OR  DELETP  ROUTINES  ON  BINARY  OBJECT  fRE 

...CAROS  TO  SE'f  UP  the  THREE  ERFS 
COPYM  0,  NFWL  IB,  OLOL  IB, BINARY) 

• 7/F»/B  rOP 

OECKl,rEOt<L,OLOLTB  **  roPY  FIRST  L DECKS  FROM  OLDBIN  FRF 

PUTIN, .BINARY  *♦  INSPpT  NEW  ROUTINE  PUTIN 

DFCKN,rECKN,OLOLTB  **  COPY  LAST  ? DECKS  EPQH  OLDBIN  FILE 

AODCK,*, BINARY  •*  ADD  ON  REST  OF  NEW  ROUTINES  FROM  BINARY 

• 7/«/q  FOR 


SFLECT  ROUTINES  ERON  BINARY  (OBJECT)  FILE 

USERSEL,CMSOOOO.  NAME  / CODE 

CHARGE.USEP, JJJJJJJJJJ. 

ATTACH,BINLIB,ID=XXXX,MP=1. 

REOUEST,GOEILF,*pe. 

COPYN(n,GOEILE,BINLTB) 

COHHENT.  TWO  ALTERNATIVE  WAYS  OF  SELECTING  A ROUTINE  ARE  SHOWN. 
CA  T ALOG,GOEILE,IO  = XYxy,XR=VOTG. 

• 7/B/q  FOR 

EIGEN 

HESS2, ,BINLIB 
WPOF  (GCEIL*^) 

• 7/<*/q  FOR 

E/7/«/0  FOE 
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COPY  A PANOOM  FILE 


CHAor*^, .... 

AT  TACM, PANIN,  . ..  . 

pfolfct,panoijt,*of. 
rOPyP.PANTN.PANOUT. 
CATALOr.OANOUT,.... 
•'  P/7/«/q  rop 


N AME/CnOE 


INPUT  RANDOM  FILP 
OUTPUT  FILE 


CONVPPT  PLOCKEO  STPAN&FR  TAPE  (7-TRACK)  TO  CARD  IMAGE  DISK  FILE 

N AMF/COOF 


input  file 

OUTPUT  FILE 


CONVERT  9-TRACK  FPCDIC  TAPE  TO  CAPO  IMAGE  DISK  FILE 

JOPN AMF,NT1 , . . ..  NAME/COOE 

CHARCF,..  .. 

VSK,TAPF=SLOT03=MYTAP2, 

PEOUFST,TAPF,HO,S,ER, NORING. 

PFCL'EST.DTSK,  *PF. 

COMMENT.  SPECIFY  DAYFILF  M>FSSAGFS  ANO 
COMMENT.  OPPN  WITH  REWIND,  CLOSE  WITH  UNLOAD 

FTLP,TAPF,BT=P,RT=F,MRL=80,SDS=YFS.CM=YES,OF=R,CF=U,MqL=S120. 
COMf-ENT.  REWIND  TEPORE  ANO  AFTER  USE 
FILE .DISK  ,RT  = C,RT  = Z,MPL  = 8 0, OF  = R,CF=P. 

CORYPM, TARP, disk. 

CA  TALCG, DISK, ... . 

••  f/7/8/q  EOF 


I NPUT 
OUTPUT 


JCPN  AHP , MTl  , . . . . 

CHARGP,.... 

VST, TAOF=SL0TnF=MYTAPl. 

PFCl'PST,  T APP,HY,S,NOPING. 

RPCLFST,DTSK, »PP. 

pTLP,TAPF,OT=F,PT=P,MRL=S1Z0,CM=YES,MRL=80. 
PILF,niSK ,qT=C,RT=?,MPL=8n. 

CCFYRM, TAPP, DISK. 

CATALOG, DISK,  .... 

••  P/7/n/q  FOP 


CRFATP  q-TPACK  EBCDIC  TAPE  OF  CARD  IMAGES  BLOCKED  20 

JOPN AHr , Nil ,..  ..  NAMF/CODE 

CHARCF,  .... 

VSN,TAPP=SLOTn4=MYTAP3. 

ATTArH,OTSK,CAPniMAGES,TD=XXXX, 

PPCL'EST,T  APP,HD,S,EB,R1NG. 

FILE . DISK ,BT= C,RT=7,MRL =80.  INPUT 

FILF, T  APE  ,BT  = k',PT  = P,MPL  = 8 0,RB  = 20,MBL  = 16  00  ,CM=YES.  OUTPUT 

COPYPM, DISK, TAPP. 

RF  TURN, TAPP. 

- F/7/«/q  FOP 
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•••*•  LIRPftPY  MAINTFNANCE  JTILITIFS 


UPDATE  IS  A UTILITY  FOP  MAINTAINING  LIBRARIES  OF  SOURCE  PROGRAMS 
AND  DATA.  IT  IS  DFSCRIBFO  ON  PAGES  7-?  THRU  7-8. 


EDITLIB  IS  A UTILITY  FOR  MAINTAINING  LIBRARIES  OF  OBJECT  PROGRAMS. 
BOTH  RELOCATABLE  AND  ABSOLUTE.  IT  IS  DESCRIBED  ON  PAGES  7-9  THRU  7-17. 


BEGIN/REVERT  IS  A METHOD  OF  EXECUTING  A SERIES  OF  FREQUENTLY  USED 
CONTROL  CAROS.  THESE  MAY  BE  GATHERED  INTO  LIBRARIES  OF  CATALOGUED 
PRCCEOURES.  BFGIN/PEVEPT  AND  CATALOGUED  PROCEDURES  ARE  DESCRIBED  ON 
PAGES  7-lB  THRU  THF  END  OF  THF  CHAPTER. 
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•*»  UPHftTF  •** 

L'PPftTF  TP  a MaTMTENANCr  PPOCPAM  THAT  CPEnTES,  CORRECTS,  aNO 

MaNTPutaTPs  ppoGRaM  LTO^aPY  files. 

uonaTF  oara  “iav  bf  aNY  ''ymbolic  iNFORMariON  (E.g,,  source  caROS 
Foo  a rc^tPTLFP  OR  nara  capOS).  upoaip  tdentififrs  usuatLY  oestroy 
TNFCR^'aTTPN  IN  Ca^O  COLUMNS  7B-R0.  THE  UPOaTE  LIBRaRY  IS  a BINaRY  FILE 
OF  raPF  TMaCFS  in  COMPRPSSFn  rOPMai.  the  history  INEORMailON  RETAINED 
ON  L'PnaTP  files  allows  the  user  to  DELETE  CORRECTIONS  PREVIOUSLY  MaOE 
OR  TC  PFSTORF  FORHEP  (INACTIVE)  CODE. 

a DISK  PROGRAM  LIBRBPY  IS  NCRMALLY  IN  RaNDOM  FORMAT.  THE  RANDOM 
PILE  (PaSTFO  ACCESS  BUT  LaPGFR  PRIJ  SPaCF)  STQPES  EACH  DECK  AS  A LOGICAL 
RPCORO  WITH  DECK  LIST,  DIRECTORY,  AND  TNDPX  FOLLOWING  THE  LAST  DECK. 

THP  SPCUFNTIAL  FORwaT  (PFQUIRFD  FOR  TAPE  FILES)  CONTAINS  ONE  BINARY 
RECOPn  IN  WHICH  DECK  LIST  AND  DIRECTORY  OCCUR  FIRST. 

UPOaTP  COMPILE  FILES  ARp  On-CHAPaCTER  UNIT  RECORDS  UNLESS  »8» 
OPTION  was  USED.  SOURCE  PILPS  AND  ' UPDA TE , 8 , . . . . • COMPILE  FILES  ARF 
80-rHaoaCTFP  unit  ppCOPDS  SUITABL'^  for  PUNCHING. 

*»»  UPDATF  CARD  PARAMETERS 

PPPDUENTLY  USPO  FILF 
LFTTER  DEPaULT 

C COMPILE 

0=0 

p OLOPL 

N NPWPL 

L ai?B4 

L = 0 
R 

I INPUT 

0 OUTPUT 

M MpRGF 

K COMPILE 

S SOUPCE 

FILE  identifiers 

OPTIONS  ON  WHAT  GOES  TO  COMPILE  FILE  (UNLESS  C=0) 

P all  decks  (FROM  OLD  PL  AND  UPDATES) 

0 only  decks  nbmed  on  ^compile  cards. 

when  0 AND  N USED,  SUBSET  THESE  TO  NEWPL. 

DEFAULT  WHEN  F AND  0 OMITTED)  DECKS  MODIFIED  THIS  RUN  OR 

ON  »COMPILP  CARDS 

« FORCE  COMDxlE  file  ENDPUNCHING  into  73-80  FOR  PUNCH 

OPTIONS  B,  W DETERMINE  IF  NEWPL  IS  SEQUENTIAL  OR  RANDOM 
B CONVERT  PaNDOM  DISK  OLOPL  TO  SEQUENTIAL  NEWPL. 

(NO  DIRECTIVES  ARE  READ  AND  NO  COMPILE  FILE  CREATED) 
(USE  TO  BACKUP  OLDPL  TO  TAPE) 

W DISK  NEWPL  IS  TO  BE  SEQUENTIAL. 

(SPF  UPDATF,  4-2). 

pyaMPLPst  upnaTE(P,N) 

UPDATE, Q,P=LAST. 


IDENTIFIERS 

PURPOSE 

DEFAULT  EXCEPT  FOR  B OPTION  RUNS 
DELETE  CREATION  OF  COMPILE  FILE 
CLD  PPOGRAM  LIBRARY  FILE 
MUST  aPPFAR  IF  NEW  PL  IS  DESIRED 
SEVERAL  SPECIAL  PRINT  OPTIONS  EXIST 
SUPPRESS  UPDATE  PRINTING 
SUPPRESS  ALL  REWINDS 

otherwise  C,N,P,S  rewind  before  AND  AFTER 
USE  ONLY  IF  UPDATE  DIRECTIVES  ARE  IN  FILE 
USE  ONLY  IF  UPDATE  OUTPUT  IS  TO  FILE 
USE  ONLY  TO  COMBINE  2 OLD  PL'S  TO  NEWPL 
CAUSE  COMPILE  file  TO  CONTAIN  DECKS  IN 
COMPILE  DIRECTIVF  SEQUENCE  - FOR  OVERLAYS 
FILE  FOR  UPDATE  INPUT  TO  RESEQ  DECKS 
FOR  OLD  PL  AND  NEW  PL  MAY  NOT  BE  SAME  FILE 
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UPDATE  DIRECTIVES  *** 

UPDATE  REQUIRES  AN  INPUT  LOGICAL  RECORD  OF  DIRFCTIVFS  (•  IN 
COLUPN  1).  A 7/B/9  FOR  IS  REQUIRED  EVEN  IF  NO  DIRECTIVES  USED,  ExCEPf 
WHEN  PARAMETER  A OR  Q IS  USED  ON  THE  CONTROL  CARO. 


•CCMOECK  NAME? 


♦DECK 

•CALL 


NAMEl 

NAME? 


•ADDFILF  FILENtNAMEN 

•ACDFILE 

•lOENT  UNIQUE 
•INSERT  NAMEl. SEGNO 
•DELETE  NAMEl. SEQNO, NAMEl 
•DELETE  NAMEl. SEQNO, SEQ? 
•DELETE  NAMEl. SEQNO 
•CCMPILE  NAMEl 
•READ  FILIN 
•SEQUENCE  DNAMEI 
•CCPY 


STORE  SET  OF  COMMON  CAROS  ONCE 

•COMOECK  MUST  PRECEDE  •DECKS  THAT  *CALL  IT 

INSERT  NEW  DECK  (SUBPROGRAM  OR  GRCUP' 

INSERT  COMOECK  NAME?  INTO  CURRENT  DECK 

HERE  FOR  COMPILE  FILE 

ADO  FILES  (INCLUDING  •DECK  CARDS)  tO 

EXISTING  LIBRARY  AFTER  DECK  NAMEN 

ADD  INPUT  DECKS  WHICH  FOLLOW,  AFTER  LAST 

DECK  OF  OLDPL 

INITIATE  CORRECTION  SET 

INSERT  CAROS  AFTER  SEQNO  IN  NAME! 

•SEQ?  DELETE  CAROS  SEQNO  TO  SEQ?  INCLUSTV' 
AND  OPTIONALLY  INSERT  OTHERS 
DELETE  CARO  SEQNO  AND  OPTIONALLY  INSERT 
COPY  SPECIFIC  DECK  TO  COMPILE  FILE 
INSERT  RECORD  FROM  FILIN  WITHOUT  REWINDING 
PESEQUFNCF  ACTIVE  CARDS  IN  DECK  ONAMPI 


DNAME,NAMFI. SEQNO, NAMFI. SEQ?  COPY  IN 

AT  CURRENT  INSERT 


•RESTORE  NAMEl. SEQNO 
•HEOR 

•YANK  NAMFI 
•PURGE  NAME! 

•PURDECK  NAMFI 
•FULLMOO  NAMFI 
•REWIND  FILIN 
•SKIP  FILIN, N 

READ,  SKIP,  AND  REWIND 


OR 

REACTIVATE  A DELETED 
INSERT  OTHERS 
CAUSE  COMPILE  FILE  T 
INACTIVATE  A CORRECT 
PERMANENTLY  DELETE  A 
PERMANENTLY  DELETE  A 
RECREATES  A CORPPCTI 
REPOSITION  FILIN  AT  START 
SKIP  FORWARD  N LOGICAL  PFCORDS  0 
( A file  mark  is  a logical  PECO'' 
ARE  NOT  VALID  EOR  C , P , N, I , 0 . M , S 


ROS 

FROM  D 

EC 

K 

DNA 

ML 

DEL 

ETE  PO 

SI 

1 I 

CN 

CAR 

D AND 

0 

PT 

IONA 

t LY 

0 INCLUOE 

Rt 

CO 

RD  M 

ARK 

ION 

SET  WI 

TH 

I 

D N A 

ME  I 

COR 

REC^ro 

N 

SF 

X NA 

ME 

LL  C 

ARDS  I 

N 

DE 

C<  N 

A MX  I 

ON  S 

ET  ON 

FI 

1 

SOU 

PCT 

?;  F I L ^ N 
u ALSO) 
F IL  ES  . 


AN  ALPHANUMERIC  IDENTIFIER  (MAXIMUM  OF  H CHARACTFRS)  GOES  ON  TH! 
•DECK  OR  •COMOECK  CARD  FOR  PROGRAM  LIBRARY  CRFATION  AND  ON  I t(F 
CARD  FDR  CORRECTION  OR  EXPANSION  PUNS.  ALL  CARDS  IN  A PARTICUl,  fR  DECK 
OR  CCMDECK  ARE  SEQUFNTTALLY  NUMBERED  BY  UPDATE  (E.C.,  SCI?. 4?  IS  iMf 
4?ND  CARO  WITH  IDENTIFIER  SCI?.  NOTE  THAT  CARD  SCI?.)  IS  *OEiK  SCI?). 
MOST  DIRECTIVES  WHICH  MANIPULATE  WHOLE  DECKS  OR  IDFNTS  MAY  CONTAIN 
A LIST  (COMMA  SEPARATED)  OP  AN  INCLUSIVE  LIST  (PERIOD  S'^PARArFD). 
these  INCLUOE  •compile,  •PUPGE,  •PURDECK,  *SFQUENCE. 


AETPR  •ADDEILF  DIRECTIVE 
FUPTMEP  COPPFCTION  OP 


MOST  OIPECTIVES 
LF  TIERS.  PRINTED  OUT 
FOP  SUrCFSSIVF  CORPFC 


ONLY  COMPLETE  DECKS  MAY  nCCtjR. 


ANY 


USING 


SEVERAL  COMPILE 
•IF,  ’ENn,  ’OF 


T 

NSEPTT 

ON 

CAR 

DS  MUS 

T 

PE 

p 

R 

EOF 

DE 

D 

BY 

AN 

4- 

ID 

FMT  . 

M 

AY 

RE 

ABB 

REV 
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i 
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C 
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BY 

i 

0 

° ? 

PU 
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IN 
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HE 
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9 
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V 

Bf 

n 

M 

I T 

TfP. 

r 
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ni 
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TTV 
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ON 
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•••  SAMPLE  UPHATE  SETUPS 


CPFATE  SOURCE  PROGRAM  TAPE  LIBRARY,  LIST 


NAME  7 CODE 


USFRHAt<,T?nO,MTl. 

ChARGE.USER, JJJJJJJJJJ. 

L APFL, NEWPL.L  = USFRALONELI R.W,P=HV ,T  = 7, VSN  = CA999q,RING. 


UPDATF«N,P)  •• 

RFTURN«NFWPL.  »• 

COPYSE  ICOHPIlF)  •• 

• 7/A/9  FOR 

»DFCK  ALONE 

(FORTRAN  MAIN  PROGRAM) 
•OECK  ATMO 

(SUPROUTINE ) 

•OFCK  THREE 

(SUeROUTINF  > 

•ofck  four 

(FUNCETON  ) 

» 7/P/P  FOR 

” F/7/A/Q  FOE 


CREATE  NFM  UPOATF  PL,  ALL  DECKS  TO  COMPILE 
RETURN  TAPE  OR/VE  TO  SYSTEM 

SINGLE  SPACE  LISTING  KITH  SEQUENCE  NUMBERS 
update  niRECTIVES  A NO  SOURCE  DECKS 


UPOATf  01  •)  «-Oi«r|  » -A  • 


NT  M AN"*  f »F  CUTE 


USEPrAP,T?00,**T-».  NAMf  / CODE 

CHARG«',USPR,  JJJJJJJJJJ. 

LAPEL,PL0PL,L=USERAL0*#  I f B,»,  f .Y'.N  AMRNO.NORING. 

L A pel ,KFMPL ,L  =USE  PTESl  ! P,  - mt , ■ , t , N AA AAA, RING. 

UPDAYE(N,E»  opt  P)  k’Tm  ^■'RR^CTIONS  and  all  TO  compile 

RFTUPN,N'’HPl,OlOPl.  UIT.RN  ’APfS  Tri  •'tsTEM 

etn(I)  - «riit  rpo-  (PoaTFO  FILE  IMPLIES  I=COMPILE 


LE,0. 

• 7/A/O  fOR 

• I cent  Sr,  10  30 
•INSERT  ALONE. G7 

(FORTRAN  statement^) 
•OELETE  FOUR. 1?, IT 

(NEW  CAPOS  TO  RfPLACE 

• 7/A/P  for 

“ f/7/A/P  EOF 


f rEF  ; T» 


'^RRE.TION  H.JST  AE  UNIQUE  ( I N I T I A L S , 0 A T F » 

CORRECT  nrc«  alone  hv  Insert  aetep  card  5/ 

CORRECT  OECK  FOUR  REPLACING  CAROS  1 1 3 

OFLE  TTONS  - optional  » 


ALTFonaTIVP  capos  if  OLOPL  ANO  NEhPL  names  are  chosen  by  user 

I A PE L,S  AM, L = USE RTF slip, 0= H Y , M , T r 7 , V EN  = C A A A A A , R I N&  . 

PEQCEST, JOE, MY, VSNsCAPPPq, NORING. 

UPOATF (P= JOE, N^S A “,E ) 
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CREATE  SOURCE  PROGRAM  DISK  LIBRARY,  EXECUTE 


userpi,cmgoooo,tio. 

CM argp,uber, JJJJJJJJJJ. 
opOLF5T,NEWPL,*pE. 

UPPATP (N) 

CAT  «LCG(NEWPL,MflCTPROGPL, in=XXXX,XR=RDONLY ) 
Cn»CL  « T=CnMPILE) 

LGC. 

• 7/A/q  EOR 

•OECX  NAMEl 

fCOPOL  SOUPC‘=’  PROGRAM) 

• 7/«/q  FOR 

(OATA  CAROE,  IE  ANY) 

••  f/7/fl/q  FOP 


NAME  / CODE 


COFATE  BACKUP  TAPE  COPY  OF  DISK  SOURCE  LIBRARY 


USEPP?, T1 OO.MTl,  NAME  / CODE 

CM ARCr,uSPR, JJJJJJJJJJ. 

L APFL,NFWPL,L=USPPmaSTUP,  T=30  ,n  = HY,  W,VSN=CJGGhtj  ,RI  NG  . 

AT  TACH,OLnPL,HASTPROGPL,IO=XXXX. 

UPrATE(N,B)  CHANGE  RANDOM  FILE  TO  SEQUENTIAL 

~ fe/7/«/q  EOF 


total  replacement  OF  EXISTING  DECK 


U<;FPRrP,MTi.  name 

fhARCF,ucFP, JJJJJJJJJJ. 

L APFL  ,OLDRL,  L = 'JSERAL0NFLIB,R,  n=HY  , V SN=  C ABBOO  , NO  R I NG  . 
RFCUFST,NFWPL ,*PF. 

URCATF  tN,E) 

cn talog,newrl,alonfpl , in= user, pw= keep, xr= keep. 

• 7/«/q  FOP 

•pURCfcx  three 

• DL'PFF  three 

• A rPF  u F 

•nrrx  Tmpff 

(SURROUTINF  source  CARDS) 

••  T/7/0/B  FOF 


name  / CODE 


J'JNP 
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select  routines  off  source  subroutine  library 

flNO  COMPILE  WITH  OWN  PROGRAM 


USPRL.'P,CMlpg0  0 8,T30  0,MTl. 
CHARGE, USER, JJJJJJJJJJ. 
FTN  . 

COMPILE  OWN 

L APFL,LTBR,L=CLIBRAPYUP03, 
UPCATF (P=LIBR,Q,L=0) 

D=HY,P, VSN=CA0 

UNLCAO,LIRR. 

FTN(I  = C0MPILF,L  = '),0PT=1) 

OMIT  L=0  IF 

LGC. 

• 7/P/q  FOR 

EXECUTE 

(OWN  FORTRAN  DECKS) 

* 7/<)/q  for 

NAME  / CODE 


'CCMFILF  ARPLNl 
•rCMFILE  AMXUTM 
* 7/»/P  FOR 

jnflTA  CAROS,  IF 
••  e/7/«/q  EOF 


PROGRAMS 


LISTING  OF  FORTRAN  IS  DESIRED 


SELECT  DECKS  FROM  LIBRARY 


ANY) 


ADO  routines  to  EXISTING  LIBRARY  TAPE  - PRINT 


US 

ERMO 

,T1 

00, 

CH 

ARGF 

,us 

'^R, 

LA 

PEL, 

OLD 

RL, 

LA 

PFL, 

NEW 

PL, 

UP 

DATE 

(N) 

RF 

TURN 

,0L 

OPL 

CO 

PYSF 

(CO 

Mpi 

« 

7/ 

«/q 

*I 

CENT 

SG 

120 

•A 

nOFT 

LF 

*0 

ECX 

NEWONE 

(SUPRO 

UTI 

•D 

ECX 

ANO 

THP 

(SUPROUTI 

•« 

f / 

7/8 

/q 

MT?.  name  / CODE 

JJJJJJJJJJ. 

L=XXXXLASTLIB,R,0=H,VSN=CA«A8 8, NORING. 
L^XXXXNEXTLIB, W,0=HY,T  = 7,VSN  = CAqqBB  ,RING. 

,NFWPL. 

LP, OUTPUT)  LIST  ADDITIONS  TO  LIBRARY 

FOR 
17 

INSERT  NEW  DECKS  AT  END 

NF  SOURCE  CARDS) 

NP  SOURCE  CAROS) 

EOF 


RUNCH  SELECTED  DECK 

JOPNAMF,....  NAME  / CODE 

charge,. . . . 

ATTACH, OLOPL,  .... 

IJPrATE,M,Q. 

ROUTE,POMOILF,OC=PU,TID=C. 

• 7/8/q  FOR 

♦COt'RILF  AMXUTM 
" E/7/8/q  EOF 


PUNCH  AT  CENTRAL  SITE 
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CPPATE  POOGPAH  LIRPAPY  FpOM  STRANGER  SOUPCE  FILE 


USTPSF,MT1.  name  / CORE 

CH  APGFtUSFR, J J JJJ J JJJ J. 

VSN,TAPFl=SLOTYX=STPANG. 

RFCUFST,NFWPL»*PF. 

RFCLFST, TAPE 1,S, HI, NOPING. 

BEGIN, rOPYRLK.  PEPLOCK  TO  SI  FILE  - SEE  COLIR/P 

RE  TL'RN,  TAPEI  . RELEASE  TAPE  DRIVE 

REWIND, TAPE?. 

UPOATP(P,N)  CREATE  ONE  DECK  CONTAINING  WHOLE  PROGRAM 

CAT  ALOG  ,NEWPL  .STRANGE  PL  , I D = IJSER  , X R=  KFE  P. 

COPYSE, COMPILE.  LIST  LIRRAPY  WITH  ASSIGNED  SEQUENCING 

• 7/«/q  FOR 

•DECK  PROG 
•READ  TAPE? 

••  E/7/»H/q  EOF 


SUBDIVIDE  INTO  DECKS  - CORRECT  j 


USERSn.  NAME  / CODE  | 

CHARGP.USER, JJJJ JJJJJJ.  | 

ATT  ACH, OLOPL ,STPANGfPL, TO  = USEP.  ’ 

REQUEST, NPWLIR,*PE.  ^ 

update (P,N=NEWL IB)  ' 

CA  TAL0G,NEWLIP,STRAMGEPL, ID=USEP, XR  = KEEP, PW=KFEP.  . 

ETN,T.  ‘ 

LGC. 

• 7/P/q  FOP  ^ 

•TDFNT  SGG7S7T  1 

’INSERT  PROG.l 

PROGRAM  AMY  ( T NPU T , OU TP U T , T A PE R ) 
corrected  EOP  CDC  ETN  JAN  1B73  S GOOD 
•INSERT  PROG.P 

•rCFY  FROG, PROG. S, PROG. G MOVE  SPECIFICATION  STATEMENTS 

•DELETE  PPOG.S.G 
•TNSEPT  PPDG.IG 
•DECK  SUBl 
•INSERT  PROG.?q 

•DECK  sun? 

•TNSEPT  PROG. 71 
•DECK  SUBT 
•insert  PPOG.GA 

•DEEK  7EPD 

•sequence  SUBI.7ERO  SEQUENEE  EAQH  DECK  (SUBl  Tmru  7ER0) 

• 7/>^/D  EOP 

(OATA  CAPOS) 

• 77»/q  EOP 

E/7/c/q  eqc 


c. 


JUK  1>^73 


SA'^PLF  STPANGF»  SOUPCF  FILE  LIST 


C PPOGPA"  FROM  OTHFR  COMPUTER  SYSTEM 
f'STA  O/1«*0./ 

TATA  RL,PT/1H  , 3.14159/ 

OIMFNCIPN  R(1»3),C(5) 

TNTFGFP  RL.C 
3 PFAn  2,  TT.J.A 
2 EOomaT ( A5, I5.F10. 

TR(TT  .EO.  PL)  GO  TO  9 
CALL  SUPl  (TT,J,C»K) 

IF(  N ,NP.  0)  CALL  SU92(IT,J,A) 

OALL  SUP3(A,P.K) 

TF(K  .EO.  0)  GO  TO  3 
WPTTF  <fl)  C 

0 STOP 
FNO 

’^URPOUTTNP  SURl  (ALP,J,C,K) 
niMENSION  C(6) 

TF(  J ,GT.  5)  GO  TO  2 
C(J)  = ALP 
=0 

RETURN 
2 K = 1 
PFTURN 
END 

SUPPOUTTNE  SUB2 (ALP, J, A) 

C FPPOP  PRINTOUT 

PRINT  ?,  ALP,J,A 

2 FORMAT  (12HOOATA  ERROR  A6,I5,F12.2) 

RETURN 

RNO 

SURROUTINE  SUB3(A,P,K) 

OIMFNSION  9(1«) 

CO  5 1=1,13 

IF(R(T)  .EQ.  0.)  GO  TO  3 
5 CONTINUE 
WRITE  (3)  R 
OALL  7FPO  (R) 

K = 1 

RETURN 

3 P ( I ) = A 
w = 0 
RETURN 
RNO 

SURROUTINE  ZEPO(R) 
niMENSION  R(13» 
no  1 1=1,13 
P(I)  =0. 

1 CONTINUE 
RETURN 

C USE  this  reck  as  input  TO  PRECEDING  EXAMPLES 
RND 


^ 
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**•  FDITLIB  *•* 

through  thf  FOiTLin  utility  program,  a usfr  can  crfate  a library  of 

B(NARr  ROUIINFS.  FOITLIB  CAN  HANDLF  THF  BINARY  OUIPUt  OF  ANY  COMPILFR 
O'-  IHAGF  (ABCOLUTF)  MOOULFS  (SFF  CCRM,  GFNFRALLY,  THFPF 

Ci^NKCT  flR  MORF  THAN  ONF  RFLOCATABLF  MAIN  MOOULE  IN  A LIBRARY;  THFPF  CAN 
TF  RORF  THAN  ONE  CORF  IMAGE  MOOULE.  ABSOLUTF  FILES  CREATEO  BY  SFGLOAO 
CANNOT  BE  PROCFSSEO  BY  EOITLIB. 

PRLCCATABLF  MOOUIES  ON  A USER  EOITLIB  ARE  SUITABLE  FOR  AUTOMATIC 
L-'-'f-jKir,  or  LOAnFR.  A LIBRARY  IS  MAOE  AVAILABLF  TO  THE  LOADER  BY  ONE  OF 
THF  t-'OLLOWTNG  LOAOFR  CONTROL  CAPOSl 


L !nPAPY,L iBNAME. 
LOSRT (LIB=LTBNAME) 


WHERE  'LIBNAME*  IS  THF  LFN  OF  THE  LIBRARY 


FOTTLTB  can  BE  USFO  TO  AOO,  DELETE  OR  REPLACE  ROUTINES,  MODIFY 
S‘'iFCTFn  '’ARAMFTFRS..  AND  PRCVTOF  STATISTICS  ABOUT  THE  LIBRARY  CONTENTS. 
(S'  NO'^BF,  SCOPE,  CHAPTER  7;  SUG,  CHAPTER  7) 


EOITLIB  CONTROL  CARD 


fHF  FORMAT  OF  THE  EOITLIB  CONTROL  CARO  IS» 


EOTTLIBI  £r-LFNOIR,L  = LFNLIST) 


all  parameters  are  optional. 

LFNOIR  - ETLF  CONTAINING  DIRECTIVES.  (DEFAULTt  'INPUT*) 
LFNLTST  - FTLR  TO  CONTAIN  LISTABLE  OUTPUT.  (DEFAULT:  'OUTPUT') 


**•  EOITLIB  DIRECTIVES  **» 

EOITLIB  DIRECTIVES  APPEAR  IN  COLUMNS  1-72,  ONE  DIRECTIVE  PER  CARO 
ANP  HAVE  ONF  OF  THF  FOLLOWING  FORMATS: 

KEYWORD. 

KFVW0RD(<PARAMFTEPS>) 

riRFCTTVFS  FALL  INTO  SIX  CATEGORIES:  CREATING  A LIBRARY; 

mo-T’-ytng  a ltbrary:  manipulating  files;  changing  library  format; 
..i^riNG  statistics;  miscell anfous. 

IN  fHF  OFSCRIPTIONS  BELOW,  <PROG>  IS  A ROUTINE  NAME  OR  RANGE  OF 
RO'JTINFS  and  may  have  ONF  OF  THF  FOLLOWING  FORMS: 


FOOGI 

FOCGI  /PROGR/PROGI 
FRCGl »PROG? 

FRCGl -PROG? 

*»PROG? 

r o p r,  I » * 


•L  ROUTINES  ON  SPECIFIFO  FILE 
:CIFIC  ROUTINF  'PROGl ' 

SPECIFIC  ROUTINES  'PROGl',  'PROS2',  'PROG5' 
ROUTINFS  'PROGl*  THRU  'PROG?*,  INCLUSIVE 
ALL  ROUTINES  EXCEPT  'PROGl'  THRU  'PROG?', 
INCLUSIVE 

ALL  ROUTINES  FROM  CURRENT  POSITION  THRU 
'PPOG?',  INCLUSIVE 

ALL  POUTINFS  fpom  'PROGl*  TO  END  OF 
L IBPARY 


IP77 


PiGF  7-10 


*»  CR FATING  ft  LIBRflPY  •» 

LTaPARY(LrPNaMF,NFW)  MUFT  dpfcFOE  ALL  OTHFR  OIPECTM/FG  FYCFPT 

FILF  MANIPULATION  AND  COHMFNTG. 

flop (<pi?nr,>, FROM)  Aor  GPrciFiFo  »outinf(S)  of  file  'f»om* 

FINISH.  PFOUIPFD  TO  TFPMINATE  LIDRAPY  CREATION 


MODIFYING  A LIBRARY  »* 


LI  HP ARY (LIBNAMF.DLD) 
AOr ( <PPOG>,PROM) 

KFPL  APF ( <PPOG> ,FROM) 

rp(_rTc  (<di?0G>) 

SRTAL ( <OPOG>,LFVFL) 

FINISH. 


MUST  PRFCFDF  ALL  OTHER  DTRECTWES  EXCEPT 
FILE  MANIPULATION  AND  COMMENTS. 

ADD  SPECIFIED  ROUTINEIS)  OF  FILE  'FROM'. 

IF  A ROUTINE  ALREAY  EXISTS,  AN  ERROR  MSG 
IS  ISSUED  AND  THE  POUTING  IS  NOT  ADDED. 

EXISTING  ROUTTNE(S)  ARE  REPLACED.  IF  A 
ROUTINE  DOES  NOT  EXIST,  A MESSAGE  IS  ISSUE 
AND  THE  ROUTINE  IS  ADDED  TO  THE  LIBRARY. 

SPECIFIED  ROUTINEIS)  ARE  DELETED. 

THF  access  level  OF  SPECIFIED  ROUTINE  OR 
RANGE  OF  routines  IS  CHANGED  TO  'LFVEL'. 

TO  RE  ACCESSIBLE  BY  CONTROL  CARD  OP  FROM 
INTERCOM,  'LEVEL'  MUST  BE  ODD.  DEFAULT)  0 
GENERALLY,  USE  AL=0  FOR  SUBPROGRAMS? 

AL=3  FOR  PROGRAMS. 

REQUIRED  TO  TERMINATE  LIBRARY  MODIFICATION 


**  FILE  MANIPULATION  ** 

FILF  MANIPULATION  CAROS  MAY  APPEAR  ANYWHERE  IN  THE  DIRECTIVE 
RFrOPD.  AFTER  AN  FDITLIB,  A RANDOM  LIBRARY  IS  REWOUND;  A SEQUENTIAL 
LTPPARY  IS  AT  FNO-OF-FILE. 


REWIND(LFN)  rewind  FILF  LFN 

PPWTNQ (LFMI/LFN?/. . .LFNN)  REWIND  ALL  FILES  NAMED 


*^KIPF  (N,LFN) 

SKIPF (<PRDG>,LFN) 

'<TPF (N,LFN,P) 


SKIP  FORWARD  N DECIMAL  RECORDS  ON  FILE  LFN 
SKIP  FORWARD  TO  BEGINNING  OF  NAMED  PROGRAM 
ON  sequential  file  LFN 
SKIP  FORWARD  N DECIMAL  FUES  ON 
MULTI-FILE  LFN 


I°P  (N,LRN) 

<;ktpb  (<PRDG>,LFN) 

SKIPB (N,LPN,F) 


SKIP  BACK  N DFCIMAL  RECORDS  ON  PRF  LFN 
SKIP  BACK  TO  beginning  OF  NAMED  POUTINF 
ON  sequential  FILE  LFN 
SKIP  backward  N DECIMAL  FILES  ON 
multi-file  LFN 
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••  CHANGING  LIBPAPY  FORMAT  •• 

a DISK  RESIDENT  LIRRAPT  IS  IN  RANDOM  FORMAT;  A TAPE  RESIDENT 
library  IS  SEQUENTIAL.  TO  CHANGE  FORMATS*  USE  ONE  OF  t 

RaNTOSEQ<RLFN,SLFN)  DISK  RESIDENT  RANDOM  LIBRARY,  RLFN,  IS 

CHANGED  TO  TAPF  RESIDENT  SEQUENTIAL 
LIBRARY,  SLFN. 

SEQTORAN»SLFN,RLEN)  TAPE  RESIDENT  SEQUENT  AL  LIBRARY,  SLFN,  IS 

COPIED  TO  DISK  LIBRARY,  RLFN,  WHICH  MILL 
BE  RANDOM.  SLFN  REWOUND  AFTER  EACH  COPY. 

THESE  DIRECTIVES  MAY  NOT  APPEAR  BETWEEN  'LIBRARY*  AND  'FINISH'. 


listing  STATISTICS  •* 

A LIST  OF  INFORMATION  ABOUT  ANY  OR  ALL  ROUTINES  ON  A LIBRARY  FILE 
OP  ANY  JINARY  FILE  OF  ROUTINES  IS  OBTAINED  BY  THE  LISTLIB  OR  CONTENT 
OIPECTI/ES.  the  LIST  INCLUDESt 
PROGRAM  NAMF 

DATE,  TIME  AND  COMPILATION  MACHINE 
ENTRY  POINTS 

external  references 

ACCESS  LEVEL  (AL) 

length  of  object  deck  in  cm  words 

TYPE  OF  PROGRAM  (RELOCATABLE  OR  ABSOLUTE) 

A LIBRARY  FILE  IS  LISTED  BYl 

LTSTLTBI<PR0G>,LEN) 

ANY  FILE  OF  ASSEMBLED  ROUTINES  IS  LISTED  BY: 

CONTENT (<PROG>,LFN) 

IN  BOTH  CASES,  'PROG*  CAN  HAVE  ANY  OF  THE  FORMS  DESCRIBED  ON  7-9. 

'LISTLIB'  and  'CONTENT'  DIRECTIVES  MAY  NOT  APPEAR  BETWEEN  'LIBRARY' 
AND  'FINISH.'. 


•*  MISCELLANEOUS  DIRECTIVES 

ENOPIJN.  STOPS  EXECUTION  OF  DIRECTIVES.  NORMALLY  THE  LAST 

OIRECTIVF.  any  OIRFCTIVFG  WHICH  FOLLOW  'FNDRUN.'  WILL 
BF  CHFCKFD  FOP  SYNTAX  RIJT  WIU.  NOT  BE  PROCESSED,  NOR 
WILL  any  FRRORS  in  THFM  CAUSE  THE  JOB  TO  ABORT. 

IN  COL  1-?  INDICATES  A COMMENT  AND  MAY  APPEAR  ANYWHERE 
TN  THE  DIRECTIVE  RECORD 
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FDITLT9  EXAMPLES 

CREATF  DISK  LIBRARY  OF  RELOCATABLE  ROUTINES 

JOBNAMF,....  NAME/COOE 

CHARGE,.... 

FTNrOPT=l)  ••  COMPILE  SUBROUTINES  TO  *LGO» 

REQUEST, MYLIB,»PF. 

EOITLIB.  •*  CREATE  USER  LIBRARY 

CATALOG, MYLIB,in=XXXX,XR=XX.  *•  PFN=MYLIB 


• 7/»/q 

FORTRAN 

FOR 

SOURCE 

FOR 

SUBPROGRAM  'SUBl' 

FORTRAN 

SOURCE 

FOR 

SUBPROGRAM  'SUB?» 

FORTRAN 

SOURCE 

FOR 

SUBPROGRAM  'SUB3* 

' 7/fl/q 

LIBRARY( MYLI 

FOR 

B,NEW) 

ESTABLISH  NEW  LIBRARY 

FILE 

ADD (* ,LGO) 
finish. 

ENDRUN. 

♦♦  ADD  ALL  ROUTINES  FROM 
••  TERMINATE  LIBRARY  CRE 
END  EDITLIB 

LGO 

ATION 

6/7/8/B  FOF 


MODIFY  LIBRARY 


JOPNAMf, .... 

CHARGF,.... 

FTN<OPT=l) 

ATTACH,MYLIB,ID=XXXX,PW 

FDITLIB. 

EXTEND, MYLIB. 

• 7/R/q  EOR 

NEW  FORTRAN  SOURCE 
FORTRAN  SOURCE  FOR 

• 7/fl/q  EOR 

LTPRARYtMYLIB,OLO) 
RFPLACE(SUB?,LG0) 

ADD (SUB4,LG0) 

SETAL  (MYPROG,  .T) 

FINISH. 

ENDRUN. 

~ G/7/n/O  FOF 


NAME/COOE 

compile  routines  to  GO  INTO  LIBRARY 
(OR  OTHER  LANGUAGE  COMPILER) 

XX.  *•  MUST  HAVE  EXTEND  PERMISSION 
••  USER  EOITLIB 

USER  MUST  EXTEND  LIBRARY 

FOR  SUBPROGRAM  'SUB?* 

SUBPROGRAM  'SUB4* 

**  SET  TO  MODIFY  OLD  LIBRARY  'MYLIB' 

••  DELETE  OLD  COPY  OF  'SUB2*  FROM  MYLIB, 

ADD  NEW  COPY  FROM  LGO 
ADD  NEW  ROUTINE  *SUB4'  FROM  LGO 
*•  SET  ACCESS  LEVEL  SO  THAT  'MYPROG'  CAN  BE 
CALLED  BY  CONTROL  CARD  OR  FROM  INTERCOM 
•*  TERMINATE  LIBRARY  MODIFICATION 
END  EOITLIB 


NOTE  t 


A SINGLE  OIRTCTIVE  R EPL A CE ( ♦ , LGO)  COULD  HAVE 
instead  of  replace (SUBP, LGO)  AND  ADD ( SUB4 , LGO ) . 
EXISTS,  IT  WOULD  BE  REPLACED.  SINCE  'SUB4'  DOES 
WOULD  BE  ADDED  TO  THE  LIBRARY. 


BEEN  USED 
SINCE  'jUB2' 
NOT  EXIST,  IT 


A 


i 
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CONDENSE  A LIBRARY 

deleted  and  replaced  files  are  not  physically  removed  from  a user 

EDITLIP  LIBPAPY.  THE  USER  SHOULD  PERIODICALLY  CREATE  A NEW  LIBRARY 
FPOH  THE  OLD  ONE  TO  REMOVE  THE  GARBAGE.  MAKE  SURE  THE  NEW  LIBRARY  IS 
VALID  (SEE  CCLIR/PI  COPYLIB). 

JOBNAME,....  NAME/CODE 

DHARGE,..  .. 

REQUEST, MYLIBl ,»PE. 

ATTACH, MYLIB, I D=XXXX. 

FOTTLIR. 

CATAL0G,MYLIB1,  MYLIH,  ID=:XXXy,PW  = XX. 

• 7/«/g  for 

LIPRARY(MYLIB1,NEH»  **  ESTABLISH  NEW  LIBRARY  FILE  'MYEILE* 

ADD (* ,MYLIB,LIB)  ADD  ALL  ACTIVE  ROUTINES  FROM  LIBRARY 

»MYLIB' 

FINISH.  **  terminate  LIBRARY  CREATION 

ENPPUN.  **  END  EDITLIB 

•”  6/7/R/B  END-OF-FILE 

NOTEt  IE  THE  LIBRARY  CONTAINS  CORE  IMAGE  MODULES,  ' SE T AL  ( <PROG> , 3 ) • IS 
REQUIPED  AETEP  THE  »AOD*  DIRECTIVE.  <PROG>  IS  DESCRIBED  ON  PAGE  7-9. 


PUT  AN  ABSOLUTE  MODULE  INTO  A LIBRARY,  THEN  EXECUTE 

JOBNAME NAME/CODE 

CHAPGE,.... 

FTN(0PT=1)  COMPILE  PROGRAM 

LOAD(LGO)  LOAD  PROGRAM  FROM  *LGO» 

N0G0,LFN.  COMPLETE  LOADING,  PUT  ABSOLUTE  ON  'LEN* 

PEOUEST, MYLIB2, *PF. 

EDTTLTB.  USER  EDITLIB 

catalog, MVLIB?, I D=XXXX,XR=XX. 

LIBRARY, MYLIB2.  ••  ESTABLISH  LIBRARY  FOR  LOADER  TO  SEARCH 

NEWPROG.  EXECUTE  »NEWPROG»  FROM  MYLIB? 

' 7/»^/q  for 

PROGRAM  NEWPROG  (...) 

(RFST  of  FORTRAN  SOURCE) 

• 7/«/q  EOP 

LIpRARY(MYLIB?,NEW)  *•  ESTABLISH  NEW  LIBRARY  FILE  ‘MYLIB2* 

ADD (NEWPROG, LEN, AL= X)  *•  ADD  PROGRAM  'NEWPROG*  FROM  FILE  'LFN' 

FINISH.  *•  TERMINATE  LIBRARY  CREATION 

FNPPUN.  •*  END  EDITLIB 

• ’7»(/q  EOP 

DATA  CAROS,  IE  ANY,  FOR  NEWPROG 
~ G 77/ 8/0  EOF 


r 


1 
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USE  SUBPROGPflMS  FROM  ft  LIBRARY 

JOPNAHF,....  NAME/COOE 

CHflRGF* . » . . 

FTN.  **  PROGRAM  REFERENCES  ROUTINE(S)  ON  'MYLIB' 

ftTTftCH,MYLI9,ID=XXXX. 

* LOSET (LI9=MYLTR)  **  ESTABLISH  USER  LIBRARY  FOR  NEXT  LOAD 

^ LGC. 

• 7/«/9  FOR 

FORTRAN  SOURCE  FOR  PROGRAM  WHICH  CALLS  AT  LEAST  ONE  OF 
SUBl,  SUB?,  SUB3,  SUB4 

• 7/A/9  FOR 

DATA  CARDS,  TF  ANY 
FOP 


USING  A PROGRAM  FROM  A LIBRARY 


JOPNAMF,....  NAME/CODE 

CHARGE, . . . . 

ATTACH, MYL1B?,ID=XXXX.  **  ATTACH  USER  LIBRARY 
LIBRA'’Y,  MYLIB2.  MAKE  LIBRARY  AVAILABLE  TO  SYSTEM 

NFWPROG.  **  EXECUTE  PROGRAM  IN  LIBRARY 

• 7/<^/q  END-OF-RECORO 

DATA  CARDS,  TF  ANY 
” END-OF-FILE 


I 


ii 


li 


A 


juNr 
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* « * 


FTN  OVFPLAY 


IN  A LIBRARY 


* *♦ 


IN  AN  OVFPLAY 
NA^'F  ON  WHICH  THF 
CALLFD,  THIS  FILE 


PPOGRAH,  'OVERLAY*  STATEMENTS  SPECIFY  THF  LOCAL  FILE 
ABSOLUTE  OVERLAY  MODULE  RESIDES.  WHEN  AN  OVERLAY  IS 
IS  SEARCHED  UNTIL  THE  REQUESTED  OVERLAY  IS  FOUND. 


WHEN  AN 
THINGS  MUST 


OVERLAY  PROGRAM  IS  ADDED  TO  AN  FDITLIB  USER  LIBRARY, 
BE  TAKEN  INTO  CON  SI DE RA T 10 N J 


THREE 


1) 


2) 


ONCE  AN  OVERLAY  PROGRAM  HAS  BEEN  PUT  INTO  AN  E 
LIBRARY,  THE  OVERLAY  FILE  NAME  MUST  BE  THE  LIB 
THE  SUBROUTINE  'OVLNAMF',  IN  LIBRARY  'NSPOC', 
PPOGRAM  TO  RUN,  REGARDLESS  OF  THE  LOCAL  FILE  N 
FILE  CONTAINING  THE  PROGRAM,  WHETHER  IT  IS  A L 
•OVLNAME'  OBTAINS  THE  NAME  OF  THE  FILE  CURRENT 
THTS  file  name  is  then  USED  IN  THE  'CALL  OVERL 
(SEE  EXAMPLE  1 BELOWI  CCLIB/Nt  OVLNAME) 


IF  AN  OVERLAY  PROGRAM  IS  REPLACED  IN 
LIBRARY  SHOULD  ALSO  BE  CONDFNSEO  (TO 
ORIGINAL  COPY  OF  THE  PROGRAM).  MANY 
UNLESS  THIS  IS  DONE.  (SEE  EXAMPLE  ? 


AN  EDITLI 
PHYSICALL 
PROGRAMS 
BELOW)  CC 


OITLIB 

USE 

R 

RAR1 

r FI 

LE 

NAME 

• 

ALLOWS 

AN 

OVER 

LAY 

AME 

GIV 

EN 

TO  T 

HE 

IBP/ 

)RY 

OR 

NOT. 

LY  BEING  E 

XECU 

TED 

AY  ' 

STA 

TEM 

ENTS 

• 

B U 

[BRARY, 

THE 

Y REMOVE  THE 
WILL  NOT  RUN 
LIB/PJ  COPYLIB) 


7)  EVPN  though  the  OVERLAY  FACILITY  ALLOWS  OVERLAYS  OF  A SINGLE 

PPOGPAM  TO  RFSTOE  ON  MORE  THAN  ONE  FILE  (FOR  FASTEN  LOCATION  AND 
LOADING),  PROGRAMS  IN  AN  EDITLIB  USER  LIBRARY  WILL  RESIDE  ON  ONE 
FILE.  yhERFFOPE,  the  'CALL  OVERLAY'  STATEMENTS  MUST  ALL  REFER 
TO  THE  same  overlay  FILE  NAME. 


EXAMPLFS  APE  ON  THE  NEXT  ? PAGES 
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L 


1»  OUT  arg  ovrPLAY  INTO  A LIBRARY 

JOBNAMP,....  NAME7C00E 

HHARGE,... . 

PIN.  RELOCArABLF  MODULES  ARE  ON  LGO 

ATTACH, NSROC. 

LnSET,LIB=NSPDC. 

LOAD(LGO) 

N0r,0.  **  ABSOLUTE  OVERLAYS  ARE  ON  'MyriLE* 

RFOUPST,HYLin,*PE.  OR  A TT  AGH  , MYL  I B,  10  = '' ■ . 

EOTTLin. 

CATALOG, MYLIR,TD=XXXX.  OR  EXT END, MYL I B. 

' 7/<</q  EOR 

OVERLAY  (MYEILE,  0,  0) 

PROGRAM  MYPROG  <INPUT=12«,  0UTPUT=128,  ...) 

C 

c the  following  common  is  used  to  transmit  ‘OVLEILE*  to 
C ALL  SUBPROGRAMS  OR  OVERLAYS  WHICH  NEED  IT 

c 

COMMON  /OVLE/  OVLFILE 
CALL  OVLNAME  (OVLFILE) 

• • • 

CALL  OVERLAY  (OVLEILE»  1,  0) 

CALL  OVERLAY  (OVLFILE,  ?,  0) 

• • • 

ENORUN. 

overlay  (MYfILE,  1,  0) 

PROGRAM  AA 

COMMON  /OVLE/  OVLFILE 

• • • 

CALL  OVERLAY  (OVLFILE,  1,  1) 

• • • 

DEIURN 

END 

OVERLAY  (MYFILE,  1,  1) 

PROGRAM  BB 

• • • 

RETURN 

end 

OVERLAY  (MYEILE,  2,  0) 

ETC. 

» 7/H/9  EOR 

LinRARY(MYLIB,OLD) 

AOnt*, MYEILE) 

» / 

•7  make  0,0  overlay  control  card  callable 

*7  EPOM  PATCH  AND  INTERCOM 

•7 

SF  I AL  (MYPROG,  ,1) 

E INISH. 

END 

••  G/7/8/B  EOF 
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FX  flMPLF 


?t  pfplacf  an  fxisting  absolutf  ovfplay  program 


ANO  CONDENSF 


JOBNAMF,....  NAMF/COnE 

CHARGE, ... . 

FTN.  ••  relocatable  MODULES  ARE  ON  LGO 

ATTACH, NSRDC. 

LnSET,LTB=NSPnC. 

LO AOILGO) 

NOGO.  ••  ABSOLUTF  OVFRLAYS  ARE  ON  'MYEILF* 

ATTACH,MYLTB,IO=tXXX. 

REQUEST,NEWLIB,*PE. 

EDITLIB. 

CATALOG,NEWLTB,MYLIfi,I D=XXXX. 

PURGE, MYLIB.  ••  TO  GET  RID  OF  OLD  LIBRARY  (OPTIONAL) 

* 7/3/q  EOR 

(FTN  SOURCE  PROGRAM) 

• 7/<)/q  EOR 


•/ 

•/  REPLACE  PROGRAM  IN  OLO  LIBRARY 

*/ 

LIBRARY(MYLIB.OLD) 

REPLACE(*,MYFTLF) 

FINISH. 

•/ 

*/  CREATE  NEW,  CONDENSED  LIBRARY 

*/ 

LI8RARY|NEWLIB,NEW) 

AOD(*, MYLIB, LIB) 

SETAL (MYPROG,3)  REPEAT  FOR  ANY  OTHER  MAIN  PROGRAMS 

FINISH. 

ENORUN. 

" 6/7/8/q  EOF 


example  3«  FXPCUTE  A PROGRAM  FROM  A LIBRARY 

JOBNAMF,....  NAMF/CODE 

CHARGE, .. . . 

ATTACH, MYLIB, in=XXXX. 

LIBRARY, MYLIP. 

MYFROG.  •• 

• 7/309  EOR 

(DATA,  IF  ANY) 

••  G/7/3/9  EOF 


ATTACH  USER  LIBRARY 

MAKE  LIBRARY  AVAILABLE  TO  SYSTEM 

EXECUTE  PROGRAM  IN  LIBRARY 
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*•*  9aTftL0t.o-n  p»omu»FS 
( Rf G IN/PF  VPR  T ) 

t rflTALOGun  ppocpouRF  raniLiTv  hbg  rp^n  ORtaiNFD  fpqm  thf 

UN1VF9SITY  OF  waGHINGTON.  THIS  FaciLITY  ALLOWS  THF  CPFaUON  AHi:  USF  OF 
•SL'PPOUTTNFS  • OF  OONTPOL  CAPOS. 

A PPOCFOUPF  CONSISTS  OF  a SFPIFS  OF  CONTROL  CaPOS  PFSIOING  CN  SOME 
FTLF.  EXFCUTION  OF  THAT  PPOCFOUPF  IS  STAPTFO  RY  a 'RpGIN*  CONTROL 
CAPO.  RETURN  FROM  A opoCFOUPF  IS  CAUSFO  RY  A 'OEVFRT.*  CONTROL  CAPO 
WITHIN  THF  PPOCFOUPF.  A PPOCFOUPp  «aY  TNCLUOF  MFSTFD  CALLS  TO  OTHFP 
PPOCFOUPFS. 

THE  'PEGIN*  CAPO,  WHICH  MUST  RF  CONTATNFO  IN  ONF  pApO  AND  hay  NOT 
RF  CCNTINUFO,  IS  USED  TO  TPaNSFFP  CONTROL  TO  A PPOCFOUPF » 

REGIN(,LFN)  WHFPE  LF>j  is  the  local  file  containing  thf 

PPOCFOUPF  TO  PE  CALLFO.  THF  USFp  hdgt  ATTACH 

OP  otherwise  CPEATF  thf  PPOCFOUPF  file  qf-froer 
IT  IS  CALLFO,  F^crpi  WHEN  USING  Thf  sysTFh 
PURLIC  ACCESS  PPOCFOUPF  FILE  (SFe  CCPH,  7-?1» 
OP  WHEN  THE  PPOCEOIJPE  FILE  HAS  LOCAL  FILE  N8ME 
•PPOFIL • . 

THE  fRFvEPT.'  card  is  USEO  TO  RETURN  FROM  A PPOCFOUPF.  IT  MUST  3E 
PART  OF  THE  PROCEDURE.  IF  A 'REVERT.'  CARD  IS  NOT  FOUND  IN  THE 
PROCEDURE,  THF  JOD  WILL  TERMINATE  AT  THE  fnO  OF  THF  PPOCFOUPF.  AS  IN  A 
REGULAR  CONTROL  CAPO  SEQUENCE,  A FATAL  ERROR  DUPING  THE  EXECUTION  OF  A 
CAPC  IN  a PROCFOUPE  WILL  CAUSE  THE  PPOCFOUPF  CAPOS  TO  OE  SKIPPED  UNTIL 
AM  'EXIT'  CAPO  OP  AN  ENO-OF-PFCOPO  OR  END-OF-FILE  IS  fncOUNTERFC.  TO 
guarantee  return  from  a PPOCFOUPF,  A 'REVERT.'  CARD  HUST  ALSO  OCCUR 
AFTER  THE  'EXTT'  CAPO.  FOP  EXAMPLE, 

...  (CONTROL  CAPOS  TO  9E  EXECUTFO) 

RFVEPT. 

EXIT.  OP  EXIT(S)  OR  FXIT(U» 

...  (ANY  CONTROL  CAROS  TO  BE  EXECUTED  IE  A FATAL  ERROR 
OCCURS  nURTNG  THE  PROCEDURE) 

RE'/EPT. 

WHEN  'BEGIN'  IS  USED  FROM  INTERCOM,  CONTROL  RETURNS  TO  THE  USER 
WHETHER  OP  NOT  A 'PEVEPT.'  CAPO  IS  ENCOUNTERED. 


THF  ABOVE  IS  A DESCRIPTION  OF  THE  SIMPLEST  USE  OF  BEGTN7REVFRT  TO 
EXECUTE  AN  UNNAMED  PROCEOURF.  THE  CATALOGED  PROCEDURE  FACILITY  ALSO 
SUPPORTS  NAMED  PPOCEOURES  ON  SEQUENTIAL  OP  RANDOM  FILES,  PARAMETER 
SUPSTITUTION  (BOTH  POSITIONAL  AND  KEYWOPO),  CONTROL  CARD  SKIPPING, 
CPFATTPN  OF  DATA  PECOROS,  PARAMpTEP  SUBSTITUTION  IN  DATA  RECORDS, 
CONTROL  CARD  OUPLICATTON,  SFLFCTIV^  CONTROL  CARD  EXECUTION. 

EOP  A COPY  OE  THE  FULL  ?7-PAGF  BEGIN/PFVERT  DOCUMENTATION,  SEE 
CriTP  CP  USE  THF  FOLLOWINGt 

B EG IN,UTILTTY,,DKn Gone, OTHFP, , REG TN, OUTPUT. 

PCUTF, OUTPUT, .... 


OUPLTCftTE  CONTROL  CftROS 
(DUP/CNOUP) 

•OOP*  IS  ft  UTILITY  (OBTftiNEO  FROH  THE  UNIVERSITY  OF  WASHINGTON) 
WHICH  DUPLICATES  CONTROL  CAROS.  ONE  OR  MORE  CONTROL  CAROS  ARE 
OUPLICATEO  0 TO  99  TIMES  IN  THE  CONTROL  CARO  STREAM. 

THE  ‘DUP*  CONTROL  CARD  HAS  THE  FORMI 

DUPtN.M)  WHERE 

N IS  THE  DUPLICATION  NUMBER  (THE  NUMBER  OF  TIMES  TO 
DUPLICATEi  0 TO  99) 

M IS  THE  NUMBER  OF  CARDS  TO  DUPLICATE  (1  TO  99  OP  *) 
(DFFAULTI  1) 

IF  N=0,  M CARDS  ARE  SKIPPED. 

IF  **=*,  DUPLICATION  CONTINUES  UNTIL  AN  'ENDUP.*  CONTROL  CARD. 

(AN  'FNOUP.'  CARO  IS  IGNORED  IF  ENCOUNTERED  WHILE  NOT  DUPLICATING 
CONTROL  CAROS.) 

occurrences  of  the  CHARACTER  'T'  IN  THE  DUPLICATED  CONTROL  CARO 
ARE  REPLACED  WITH  THE  CURRENT  DUPLICATION  NUMBER  (SEE  EXAMPLE  BELOW). 
THE  LENGTH  OF  A CONTROL  CARD  MAY  INCREASE  WITH  SUBSTITUTION  OF  THE 
DUPLTCATION  NUMBER.  CONTROL  CAROS  GREATER  THAN  BO  CHARACTERS  MAY  BE 
ILLEGAL. 

THE  DUPLICATED  CONTROL  CARDS  ARE  LISTED  ONCE  IN  THE  DAYFILE  WITH  A 

leading  • before  being  executed. 

EXAMPLE 

• • • 

DUP(3,?) 

COPYP  (TAPE, TAPES) 

REWINOdftPE*) 

• • • 

EXPANDS  TO 

• • • 

COPYP  (TAPE, TAPED 
REWIND(TAPEl) 

COPYP (TAPE, TAPE?) 

RFWINOdAPF?) 

COPYR  (TAPE, TAPED 
PEWINOdAPET) 


'DUP*  SHOULD  BE  USED  ONLY  IN  A CATALOGUED  PROCEDURE.  RESULTS  ARE 
UNPPFOTCTABLF  if  used  in  the  MAIN  CONTROL  CARO  STREAM. 
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♦**  PONnOM  PROCEDURE  FILES  *** 

UNNAMED  PROCEDURES  MUST  RESIDE  IN  A SEQUENTIAL  FILE.  NAMED 
PROCEDURES  MAY  RESIDE  IN  A SEQUENTIAL  OR  A RANDOM  FILE.  IE  A EILE 
CONTAINS  MANY  NAMED  PROCEDURES,  SIGNIFICANT  TIME  CAN  BE  SAVED  IN  THE 
LOCATION  OF  A PROCEDURE  IF  A RANDOM  PROCEDURE  EILE  IS  USED.  'CPINDEX* 
READS  A SEQUENTIAL  FILE  OF  CATALOGUED  PROCEDURES  AND  WRITES  A RANDOM 
FILE  WITH  A NAME  INDEX.  IT  IS  EXECUTED  AS  FOLLOWS* 

CPINDEX (SF OF ILF, RANF I LE) 

•CPINOEX*  HANDLES  UP  TO  ?00  PROCEDURES  PER  FILE  AND  PUTS  THE  NUMBER 
OF  FKOCEDURFS  INTO  THE  DAYFILE. 

PE  SURE  TO  SAVE  A COPY  OF  THE  SEQUENTIAL  FILE  AS  THERE  ARE  MANY 
PROCEDURES  FOR  LISTING  AND  MANIPULATING  SEQUENTIAL  PROCEDURE  FILES. 

(SEE  CCLIB/P*  PROADD/PROALL/PRODELE/PPOGET/PROHDR/PROLIST/PRONAM/ 
PROREPL ) 


L 
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*•*  PURL  I C- ACC  poOCFnuPFS  - PPOFIl  •»* 

•PPOFIl*  is  a LIRPAPY  of  PPOCFnuPFS  WHICH  MAY  Bf  pxFCUTFD  BY  USF  OF 
THF  'RFF.IN*  COMMANB. 

IT  IS  NOT  NPCFSSAPV  TO  ATTACH  THIS  FILE  BEFORE  USING  ONE  OF  THE 
PPOCEDUPFS.  WHEN  THE  SECOND  PAPAMFTEP  OF  THE  ’BEGIN*  CARO  IS  OMITTED 
(F.G.,  PFGIN,PPOCNAMF,,<PAPAMS>. • »,  THIS  FILE  IS  AUTOMATICALLY 
ATTACHFO.  THF  USFP  MUST  NOT  USF  ’PROFIL'  AS  THF  LFN  OF  ANY  OTHER  FILE, 
OR  IT  WILL  RE  USED  INSTFAO  OF  THE  SYSTEM  FILE. 

WHEN  THF  SECOND  PARAMETER  OF  THF  ’BEGIN*  CARO  IS  OMITTED  AND  ONLY 
KFYWCRD  PAPAMFTERS  ARE  USED  (E.G.,  PROCEDURE  ’AUDIT*),  THEN  THE  SECOND 
COMMA  OE  THE  *,,’  MAY  BE  OMITTED  (E.G.,  * BEG  IN , AU 0 1 T , I D = X XX X . * ) . 

SFF  CCLTR  FOR  A LIST  OF  THE  AVAILABLE  PROCEDURES  AND  CCLIB/P  FOP 
FULL  DOCUMENTATION  OF  EACH  PROCEDURE. 

SELECTED  PROCFDURFS  ARE  DESCRIBED  IN  DETAIL  ON  THE  NEXT  PAGE. 
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ncrlT  90PTPP  U9PP  AUDIT 

TO  USF  - OEGI N, fluni T, KEYWORD-PAPA  METERS. 

KEYWORD-PARAMETERS  ARE  THOSE  DESCRIBED  ON 
CCRM,  PAGE  3-4  (AI=,  AC=,  ID=,  LE=)  PLUS 

TYPE=STATIC  - STATIC  AUDIT  (OEEAULTt  OYNAMICJ 

MAX  PL  - 3S000B 

MPEAULT  - BEGIN,  AUDI T, AI  = P, ID  = XXXX,LE  = OUTPUT.  (BATCH) 

BEGIN, AUDIT, AI=I, I D=X XXX, LE= OUTPUT.  (INTERCOM) 

pxAMDLE  - BEGIN, AUDIT, AI=P,ID=XXXX. 

(USE  AUDIT  BY  ID  BECAUSE  IT  IS  FASTER  AND 
MUCH  CHEAPER) 


execute  a PROGRAM  ON  EOITLIB  USER  LIBRARY  'UTILITY* 

TO  USE  - BEGIN, utility,, PROG, PARAMS. 

PROG  - PROGRAM  TO  BE  EXECUTED 
PARAMS  - UP  TO  19  PARAMETERS  FOR  'PROG' 

‘'AX  EL  - DEPENDS  ON  PROGRAM  BEING  EXECUTED 

f DEFAULT  - THERE  IS  NO  MEANINGFUL  DEFAULT 

«• 
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CCPM  PPINT  COPTFS  OF  COPPlJTFP  CFNTFP  PFFE'7FNCF  HANOAL 

TO  USF  - PFr,IN,CCPM, .COPIES, OUTPUT, PH, CHAPTtPS. 

COPIES  - NUMBEP  OF  COPIES  10  PPINT 
(OFFAULTI  1) 

OUTPUT  - OUTPUT  FILE 

PM  - IF  NOT  OMITTED,  PPINT  MESSAGES  APE 

GENERATED  FOR  1-PAPT,  NARROW 
UNLINEO  PAPER  (FOR  REMOTE 
TERMINALS  ONLY>. 

IF  OMITIFD,  NO  PRINTER  MESSAGES 
APF  generated  (CENTRAL  SITE) 
r DEFAUL  T) 

CHAPTERS  - ONE  OF  THE  FOLLOWINGt 

ALL  - PRINT  ENTIRE  MANUAL. 
(DEFAULT) 

ONE  OP  MOPE  CHAPTER  NUmpeRS 
separated  DY  COMMAS  (0-lS,  WHERE 
0 IS  THE  table  of  contents  AND 
15  IS  THE  INDEX) 

MAX  FL  - 20000R 

DEFAULT  - DEGIN, CCRM  ,, 1 .OUTRUT ,, AL L. 

EXAMPLE  - TO  PRINT  1 C OF  ENTIRE  MANUAL  ON  NAPPCW, 
UNLINFD  PAPER  AT  CENTRAL  SI^'Et 
PFGIN.CCPM. 

RnUTE,OUTPUT,DC=PR,FC-lT,TIPrf;,FIP-». 


TO  PRINT  1 COPY  OF  CHAPTERS  ?,  T,  6,  10? 

RE GIN, CCRM,, ,,,2,1,6, 10. 
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PflGF  7-22.? 


IFF 


flU.OW  UGFP  TO  MAKF  GPTPFO  OP  SUGGFOTTONS  OIRFCILY  TO  THE 
rOMOUT'^P. 


To  'JOF  - OFGIN,  GPTPF,  , OUTPUT,  PPOMPT,  WHOM,  INPUT. 

OUTPUT  - LTSTftOLF  OUTPUT,  IF  USFR  RFQUFSTS  A 
COPY  OF  HIS  COMMFNTS.  TO  HAVE  THIS 
PPINT  AT  THF  TTY,  USFR  MUST 
CONNECT, OUTPUT. 

DPOMPT  - INTFRACTIVE  USE  ONLY 

IF  NO  - ONLY  MINIMAL  PPOMPTING  IS 
pRov  inn. 

IF  CHITTED  OR  ANYTHING  ELSE  - FULL 
PROMPTING  IS  PROVIDED. 

WHOM  - RESFRVFD  FOP  FUTURE  USE. 

INPUT  - DATCHt  file  FROM  WHICH  GRIPE  AND 

administrative  infopmation  is  TO 

PF  READ. 

interactive:  IF  GRIPE  IS  TO  3F 
FNTEREO  DIRECTLY  FROM  THE 
KEYBOARD,  OMIT  THIS  PARAMETER. 

IF  THE  GRIPE  WAS  PREPARED 
EAPLIFR  (E.G.,  USING  EDITOR), 
FNTEP  THF  LFN  OF  THE  FILE 
CONTAINING  THF  GRIPE  (DO  NOT  USE 
LFN  'INPUT'). 

MAY  FL  - TSnOOB 


default 


INTFPACTTVFT  PE  GIN, GRIPE,, OUTPUT. 

PATCH  t PFGIN, GRIPE, .OUTPUT,, .INPUT. 


DATA  - PATCH  USE  ONLY 

THF  GRIPE  IS  ENTERED  IN  COLUMNS  1-70  OE  AS  MANY 
CARDS  AS  REQUIRED  (PLEASE  RE  BRIEF). 

THIS  IS  EOLLOWFO  BY  A CARD  WITH  'END'  IN 
COLUMNS  1-T, 

THE  LAST  CARD  HAS  ADMINISTRATIVE  INFORMATION  FOR 
PREPARING  A TROUBLE  FORM,  SHOULD  ONE  BE 
NECESSARY.  IT  CONFAINSS 

_CQL_  CQtjlFEIIS 

l-?0  NAMP 

Pl-AO  niNSROC  CODE  OR  COMPANY  NAME 
Al-SO  TFLFPHONF 

51-54  USER  INITIALS  (OF  THE  FORM  XXXX) 


ckahpLF  - THF  SIMPLEST  EOR”  EQR  INTERACTIVE  USE » 

CONNECT .OUTPUT. 

BEGIN, GRIPE. 

the  simplest  EOPM  for  BATCH  USE! 

JOBNAmE,....  NAME/CODE 

charge,  .... 

BEGIN, GRTPF. 

• lop 

(GRIPE) 

F NO 
NAMI 


F.  / 7 7 o / O 


CODE 

FQF 


PHONE 


init 
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TNTFoaCTlVF  C.PAPHICG 


PM  THF  CnP  GGOQ  COMPUTFPG  AT  OTNSPDC,  INTFPACTIV'’  GRAPHICS  IS 
SUPPpPTFO  HY  thF  IMTFPAPTTVF  GRAPHICS  SYSTFH  (PAGES  B-1  THP'J  fi-7) 
THF  IFKIRONTX  PISPLAY  TERMINALS  (PAGF  fi-8). 


AND 


**■»  T rll  PPPiJCT  TOM  TT  TGS  **♦ 

IHF  nESTGN  GOAL  OF  THF  TNTfRAC'IVF  GRAPHICS  SYSTEM  ( I GS ) IS  TO 
PfPWTT  pCAL  TT^'F  USF  OF  A LARGE  COMPUTF»  (GDC  b 0 0 0 > RY  f GRAPHICS 
CONSOLE  USER  WITHOUT  SIGNIFICANTLY  DFCPAniNG  THF  CAPARILIHES  OF  THF 

lapgf  rnHDUTFP. 

IGS  USES  A SMALL  COMPUTER  (COG  1700)  TO  CONTROL  THE  BASIC  FUNCTIONS 
O'"  THE  GRAPHICS  HAROWARF.  THF  TGS  SYSTEM  USES  THE  &7  00  TO  HANDLE  ONLY 
THF  hope  DIFFICULT  MA  NI  PUl  A T I ONS  AND  TO  00  THF  m(\  t HFM  A T 1 C AL  WORK 
RFCUIRFD  BY  THF  APPLICATIONS  PROGRAM. 

THF  niGIGRAOHTCS  ?74  DISPLAY  CONSOLES  CONNECTED  TO  THE  COC  1730 
PERMIT  THE  user  to  create,  DISPLAY,  STORE,  RETRIEVE,  AND  MODIFY  ANY 

GRAFHTr<^  fopmg  Necessary  for  the  active  analysis  or  a problem,  as  well 
AS  GIVING  HIM  A MEANS  OF  ENTERING  DATA  DIRECTLY.  I HFSF  GRAPHIC  FORMS 
CAN  THF\i  nr  EXPANDED  DR  CHANGED  BY  THF  USER  IN  A REAL-TIME  Environment 
THPCUGH  HIS  application  DPDGPAH  AND  THE  INTERACTIVE  GRAPHICS  SYSTEM. 

the  ICS  PACKAGE  ON  THE  DTNSPOC  6700  COMPUTER  SF»VES  AS  THE  BASIS 
FOR  ALL  other  INIEPACUVE  GRAPHIC  SUBROUTINE  PACKAGES  CUPPENTLY 
AVAIL Aple, 


EERFkce  ct 

TMEPftcTTVE  GPAPHICS  SYSTEM,  VERSION  ? PUB.  NO.  1710I600  E 
?7‘i  TNrFDAC''IVE  graphics  SYSTEM.  NERDS  PUB.  NO.  17326700  A 


AP'^TTIDNAl.  INFnPMftTTON  ABOUT  D^NSROf;  INTFRftcTTVE  GRAPHIC  SOFTWARE 
MA ^ FE  PRTftTNFn  BY  CONTACTING! 

user  services  eoDE  IP02.1 

L HAAS  CPOE  1B43 
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♦»»  DTK'SPPC  GRAPHICS  *♦» 


CHANGES  TD  MANUAL 

frypc  MUST  9F  FOLLOWED  RY  AN  AETSKC  CALL  TO  THE  NEXT  OVERLAY  TO 
pr  rycruTED. 

ROUTINE  GUMESG  IS  NOW  SPELLED  GlMESG. 

CALLING  sequence  EQR  DMTNIT  HAS  ONLY  THREE  ARGUMENTS. 

IP  CMTRL  IS  USED,  IT  MUST  RE  IN  0,0  OVERLAY. 


CONVERTING  TASKING 

PPPLACE  THE  USP  OE  GIMAIN  IM  7PRO  OVERLAY  BYt 
call  AETSKC <NLA AA a ) WHERE 

N - NUMBER  OF  LETTERS  IN  AAAA,  MAX  7 
AAAA  - NAME  OE  LEVEL  ONE  OVERLAY  PROG. 


GENERAL  COMMENTS 

STGNON  AT  OTNSPOC  IS  AS  DESCRIBED  IN  CHAPTER  8 OE  17B?fc700  (SEE 
CCPM,  peeeRENCES),  not  as  in  CHAPTER  6 OE  17305600. 

TG''  JOBS  MUST  RP  OVERLAYED  OR  SEGMENTED.  LOADER  AND  EDITLID  MAY  BE 
USER  TO  CREATP  THE  TASK  FILE  AS  BELOW.  (SEE  ALSO  PRELOAD  AND  TSKLOAD 
CCPM,  fl-A.) 
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***  TGS  EOITLIB  FXAMPLES 


CPEftTF  IGS  TASK  FILE  FOR  274  DISPLAY 


JOPNAME, . ... 

CHARGE, . . .. 

RFC(jEST,NEWPL,*PF. 

AT  tach,cldpl,pfn, io=xyxx. 

UPrATE,N,F,C=A. 

FTK,I=A,0=PROG. 

CATALOG.NEWPL ,PFN, in=XXXX. 
LnSET(LIB=IGS274» 

LO  AC, PROG. 

NOGO. 

REQUEST, TASKFIL,*PE. 

EOITLIP. 

CATALOG,T ASKFIL,PFN1, ID=XXXX. 

* 7/8/q  EOR 

(UPDATE  CORRECTION  CAROS, 

• 7/8/q  EOR 

LIBRARY (TASKFIL, NEW) 

REWIND (SOURCE* 

ADO(*, SOURCE) 

FINISH. 

ENCRL'N. 

••  G/7/8/q  FOE 


NAME  / CODE 


COMPILE  USER  PROGRAM 

LOAD  SYSTEM  LIBRARY  FOR  IGS  ROUTINES 
LOAD  USER  BINARY  FILE 


IF  ANY) 

define  taskfil  for  library 

SOURCE  IS  NAME  OF  ZERO  LEVEL  OVERLAY 


ACCESS  TASK  FILE  FOR  EXECUTION 

JOPNAME,....  NAME  / CODE 

CHARGE, . . . . 

nTTACH,TASKFIL,OFNl,ID=XXXX. 


LIPLCAD( T 
EXECUTF. 

ASKFTL, CREATE) 

CREATE  IS 

NAME 

OF 

LEVEL 

ZFRO 

PROGRAM 

• 7/«/R 

taskfil 

FOR 

DO  NO  USE 

RERl 

OD 

AFTER 

THIS 

NAME 

6/ 7/8/q  EOF 


flUG 


197*; 


PftGE  8-4 


*•*  IGS  liTTUITIFS  *♦* 

SFVEPfll-  TGS  UTTIITIFG  HaVF  REFN  DEVELOPED  AT  DTNSPDC  BY  THE 
GPAPHTrS  GYSTPM  DEVruOPMEHT  GRnU°.  THOSE  UTILITIES  WHICH  ALSO  APPLY  TO 
BATCH  AND  INTERCOM  PROGRAMS  APE  DENOTED  WITH  AN  ASTERISK  (♦). 


* FRFLOAOl  AN  DTNSRDC-DE  VELOPECI  CONTROL  CARD  UTILITY  FOR  BUILDING, 
MAINTAINING,  AND  UTTLI7ING  PROGRAM  LIBRARIES  IN 
RELOCATABLE  BINARY  FORMAT.  EXTERNAL  REFERENCES 
MAY  BE  SATISFIED  FROM  IJP  TO  FIVE  USER  LIBRARIES. 

PRELOAD  SUPPLIES  ALL  NEEDED  ROUTINES  FROM  EACH  LIBRARY 
INTO  EACH  OVERLAY.  ALLOWS  FOR  REPLACEMENT  OF  INDIVIDUAL 
OBJECT  ROUTINES  WITHOUT  EXTENSIVE  RECOMPILATION. 
tSEE  CMD-Sl-72)  ATTACH, PRELOAD, CAMVPRELOAD,IO=CAMV. 

» TSKLOADt  AN  DTNSROC-DEVFLOPEO  CONTROL  CARD  UTILITY  FOR  BUILDING 
AND  MAINTAINING  PROGRAM  LIBRARIES  IN  ABSOLUTE  FORMAT. 
TASKING  IS  A SET  OF  LIBRARY  SUBROUTINES  AND  CONTROL  CARD 
PROGRAMS  TO  PERMIT  USE  OF  CALL-BY-NAME  OVERLAYS  (TASKS). 
THE  DESIGN,  CREATION,  AND  USE  OF  TASKS  AIDS  IN  EFFICIENT 
UTILIZATION  OF  COPE  MEMORY,  MODULARIZES  PROGRAMMING, 

AND  SIMPLIFIES  PROGRAM  MAINTENANCE. 

FIELD  LENGTH  WILL  BE  AUTOMATICALLY  REDUCED  TO  THE 
MINIMUM  N'^EOEO  FOR  EACH  OVERLAY. 

ATTACH, TSKLO AD, CAMVTSKLOAD, ID=CAMV. 


• INTEPACTIVE  DATA  MANAGERI  AN  DTNSRDC-DEVELOPED  SUBROUTINE  PACKAGE 

WHICH  PROVIDES  AN  EFFICIENT,  GENERAL  PURPOSE, 
VIRTUAL-MEMORY,  DATA  MANAGEMENT  FACILITY, 

(SEE  CMD-48-7?)  THE  PRELOAD  LIBRARY  IS  ”CAMVNEHPRE”. 

* EDIT  AN  DTMSROC-DEVELOPEO  CONTROL  CARO  UTILITY  TO  SIMPLIFY  AND 

automate  THE  USE  OF  UPDATE,  PRELOAD,  AND  TSKLOAD. 

A SINGLE  EDIT  CONTROL  CARD  MAY  REPLACE  UP  TO  23  CAROS. 
(SEE  CMD-24-73)  A T T ACH, ED I T , C A MV EDI T , I D=C AMV . 


AUTOEOITt  ADAPTED  FROM  THE  AIR  FORCE  CAMBRIDGE  RESEARCH 

LABORATORIES  THIS  INTERACTIVE  GRAPHICS  PROGRAM  MAY  BE 
USED  TO  EXAMINE,  EDIT,  CURVE  FIT,  AND  PLOT  DATA. 

(SEE  CMD-EQ-72) 
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GIPLCT 


27<.CBLC0MP 


ITIS.? 


COPYFUL 

COPY274 


A GU3ROUTINE  PACKAGE  AND  ACSOCIATED  POST-PPOCESS I NG 
PROGRAMS  TO  PERMIT  SELECTED  ITEMS  ON  THE  ?7<4  DISPLAY 
SCREEN  TO  BE  PLOTTED  ON  ANY  OE  THE  HARDCOPY  DEi/ICES 
(SC  40GO,  CALCOMP  936,  CALCOMP  763,  1700  CALCOMP,  OP 
COMOUTEK  400).  FOP  DETAILS  CALL  MEL  HAAS,  CODE  1843, 
(?02)  ??7-1933. 

A OLOT  SUBROUTINE  TO  ALLOW  ALL  THE  CALCOMP  SUPPORT 
LIBRARY  TO  PLOT  ON  THE  27U  DISPLAY  SCREEN.  FOR  DETAILS 
SEE  MFL  HAAS,  CODE  1843,  (202)  227-1933. 


THE  INTERACTIVE  TERMINAL  INTERFACE  SYSTEM,  VERSION  2, 
PROVIDES  THE  FORTRAN  APPLICATION  PROGRAMMER  WITH  A FLEXIBLE 
INTERFACF  TO  THE  274.  ALL  ROUTINES  ARE  FORTRAN  CALLABLE 
AND  ARE  USED  PRIMARILY  FOR  TWO  OR  THREE  DIMENSIONAL 
GRAPHICS  DESIGN  APPLICATIONS.  TO  ACCESS  ITIS.2  SOFTHAREI 
ATTACH, ITIS,ITISEDITLIB,ID=SNJC. 

L0SET(LIB=IGS274/ITIS) 

BEFORE  LOAD  OR  LGO.  (SEE  CCRM,  8-3) 


SUBROUTINES  IN  SYSTEM  LIBRARY  IGS274  FOR  274  INTERFACE. 

THE  PACKAGE  READS  THE  1744  BUFFER  )*EMORY,  INTERPRETS  THE 
CODE,  AND  CALLS  THE  APPROPRIATE  CALCOMP  ROUTINES  (SYMBOL, 
LINE,  CIRCL)  TO  PROVIDE  A COPY  OF  THE  274  CONSOLE  SCREEN 
IMAGE.  THE  USER  MUST  ATTACH  THE  DESIRED  CALCXXX  PACKAGE 
(XXX  IS  ONE  OF  170,  763,  936),  AND  MUST  USE 
LOSET,L IB=IGS274/CALCXXX. 

WHEN  XXX  IS  170,  THE  CALCOMP  FILE  PLOT  FOR  1700  IS 
CREATED.  WHEN  XXX  IS  936  OR  763,  THE  USER  MUST 
CALL  PLOTS  (IBUE,  NLOC,  NT) 

BEFORE  USING  THE  PACKAGE  (NT  IS  LESS  THAN  100).  THE 
OUTPUT  FILE  "TAPENT**  MAY  NOT  BE  A MAGNETIC  TAPE  BUT  MAY  BE 
CATALOGED  FOR  A LATER  JOB  TO  COPY  TO  TAPE  FOR  PROPER 
CALCOMP  PROCESSING.  "TAPENT”  MAY  NOT  BE  USED  FOR  ANY 
OTHER  PURPOSE  IN  THE  USER'S  PROGRAM. 


rrr 


ofior 


*•*  SIGNON 


•stgnon*  tg  a 

THT  CaPAQILITY  O*^ 
COKSCL'". 


UTILiry  PROGRAM  WHICH  PROVIDES  THE  GRAPHICS 
OUILOING  AND  EXECUTING  BATCH  JOBS  FROM  THE 


USER  WI 

IGS-?7<4 


T H 


IGS-?74  CONSOLE  10* 
DTNSPnc  1 

NAVSFC  ?1 

NAVaiR  11 


S AREI 

(OCTAL  ) 
(OCTAL  ) 


SIGNON  IS  INITI ATEO/TERMINATEO 
CNTRL/G  (KEYED  TOGETHEPI  - 
CNTRL/E,  THEN  CNTRL/K 
CNTRL/K 


BY  THE  FOLLOWINGJ 
START  SIGNON 
TERMINATE  SIGNON 
ABORT  SIGNON 


SIGNON  REQUESTS  ENTRY  OF  A CHARGE  CARO.  AFTER  THE  JOB  OROER  NUMBER 
IS  VALIOATEO.  THR  USRR  CAN  BUILD  A SET  OF  CONTROL  CAROS.  THIS  CONTROL 
CART  PUFFER  EXISTS  EOP  THE  DURATION  OF  THE  CURRENT  CONSOLE  SESSION.  IT 
MAY  NOT  BE  SAVED  FOR  USE  AT  A LATER  TIME. 


THE  FOLLOWING  OPTIONS  ARE  SELECTABLE  VIA  KEYBOARD  OR  LIGHT  PEN. 
ALL  KEYED  ENTRIES  ARE  TERMINATED  BY  THE  CARRIAGE  RETURN  (CR)  KEY. 


CLEAR  CONTROL  CARO  BUFFER 

RESTRUCTURE  THE  CURRENT  CONTROL  CARD  BUFFER.  ACTIVE 
CONTROL  CAPOS  ARE  RENUMBERED.  THE  USER  MAY  THEN  MODIFY 
THE  NEW  BUFFER.  TO  COMPLETELY  ERASE  THE  BUFFER,  USE 
'TERMINATE'  OR  OELFTE  EACH  LINE  IN  THE  CURRENT  BUFFER  ANO 
THEN  ENTER  CLEAR. 

PPCMFT  DISPLAY  PROPER  FORMATS  FOR  ENTERING  COMMANDS. 


last  CONTROL  CARO  BUFFER 


DISPLAY 

THE 

LAST 

BUPPER. 

BE  DESTROYED 

• 

OA  YP  ILT 

PUFFER 

DISPLAY 

THE 

LAST 

DAYEILE 

EXFCUTP 

eyecutf 

the 

CONTROL  CARO 

THE  BUFFER  BEING  BUI^T  HILL  NOT 
BUFFER. 

buffer  JUST  BUILT  OR  MOOIEIEO. 


Tf PviNfl  TE 


BND  the  console  SESSION,  MAY  BE  USED  AT  AN 
NOT  TERMINATE  SIGNON.  THE  SAME  OR  ANOTHER 
CONTINUE  BY  ENTERING  ANOTHER  CHARGE  CARD. 
CARO  BUPEPP  WILL  BE  EMPTY. 


Y TIME. 
USER  MAY 
THE  CONTR 


DOES 

01 


A 
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RUILD  A CONTROL  CAPO  SET 

TO  RUILD  A SET  OE  CONTROL  CARDS,  SIMPLY  TYPE  EACH  CONTROL  CARO. 
Sir.NCN  HILL  PREFIX  EACH  WITH  A LINE  NUMRER. 


CORRECT  (MODIFY)  A CONTROL  CAPO  SET 

INSERT  A CARD  - TYPE  LINE  NUMBER,  EQUAL  ST&N,  CONTROL  CARD) 

?1=LDSET,LIR=NSRDC. 

DELETE  A CARO  - TYPE  LINE  NUMBER,  EQUAL  SIGN! 

?n  = 

REPLACE  A CARD  - TYPE  LINE  NUMBER  TO  BE  REPLACED,  EQUAL  SIGN,  NEW 

CONTROL  CARDl 

21=LDSET,LIB=NSRDC/CALC9T6. 

ADD  A CARD  - TYPE  CONTROL  CARD  HITHOUT  LINE  NUMBER.  IT  WILL  BE 

ADDED  AT  THE  END  OE  THE  CONTROL  SET. 


delete  a character  - TYPE  SHIET/0  (LETTER  OH)  OR  SELECT  'BKSPACE*  WITH 

LIGHT  PEN. 
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»♦*  TF<TI<0N1<  4015  *** 

THF  TTKIKONTX  4'U5  T5  ft  SYNCHRONOUS  COHPUTFP  OISPLAY  TERMINAL 
CAFflPLF  OF  nrSPL-IYING  OOTH  ALPHANUMFRIC  CHARACTERS  AND  GRAPHIC  DATA. 
THF  DT^'PLAY  ppmATN^'  VISTRLF  UNTIL  IT  IS  i^RftSFO  AMP  PDFS  NOT  RFOUIRF 
CONTINUAL  P'^FRFSHING.  THF  PISPLAY  flRFA  IS  14. G RY  10.')  INCHES  IN  A 
40«F  RY  ,?1?0  GPIO.  FOUP  CHftPflCTFR  ’'"IZES  ARE  ftyfilLfiBLP.  *0  CHANGE 
CHBPACTFP  ST7=,  PUT  THE  LOCftL/LINE  SWITCH  ON  LOCftL  AND  TYPFt 

"ESC”  KTY  THFN  9 FOR  MAXIMUM  OF  74  CHARACTERS  35  LINES 


R 

91 

39 

: 

121 

59 

• 

1.3  3 

54 

THP  J PIZ*^  IS  AOEOUATP  FOR  PTftOING. 

WHEN  NO  OftTfl  1<:  [NPoT  FOR  30  SECONOS,  THE  SCREEN  WILL  DIM  TO  PROTECT 
THP  phosphor.  DEPRESS  THT  SH 1 F T KEY  TO  BRIGHTEN  THE  SCREEN  AGAIN. 

TO  OPERATE  AS  AN  INTERACTIVE  TERMINAL  TO  CDC  5000  COMPUTERS*  A 
4«OQ-RAUO  ASCTT*  1?00-RAUO  OP  300-RAUn  MODEM  IS  REQUIRED. 

.TURN  4015  TERMINAL  SWITCH  AND  HARD  COPIER  ON.  SET  LiGHI/DARx 
SWITCH  ON  HARO  COPY  UNIT  FOR  PROPER  INTENSITY. 

.SET  LOCAL/LINE  SWITCH  TO  LINE. 

.WHILE  terminal  AND  HARD  COPY  UNIT  WARM  UP,  CHECK  THESE  SWITCH 
SFTTINGSI 

.ASCII /API.  - ASCII 

.CODE  FXPANOEP  - ON 

.CLCaP  WRITE  - OFF 

.ROTARY  RAUn  - EXTERNAL  (REAR  OE  TERMTNAl ) 

.ASCII/HCD  - ASCIT  TREAR  0“^  fEPMINALl 

.RESET  P4GF  THEN  DEPRESS  SHI^'T  ANO  RESET  RACE  KEYS  TOGETHER. 
.OIAL  proper  PHONE  EOP  ThF  MODEM  CONNECTED  (SEE  CCRM,  1-2) 

.WHEN  COMPUTER  DATA  TONE  ANSWERS,  PUSH  DATA  BUTTON  AND  HANG  UP. 
.LOO  TN  AMD  RUN  JOR. 

• AT  END  OF  RUN,  IN  DOMMAND  RODE,  TYPE  l.OGOUT. 

.OISCONNFOT  THE  PHONE  LINE, 

THP  DTNSPnC  KEYBOARD  HAS  API.  CHARACTER  SET  ON  TOP  OF  THE  KEYS,  SO 
THF  PROPER  COO  CHARACTER  SET  IS  THF  SMALL  CHARACTERS  ON  THE  FRONT  OF 
SPVFRAL  OP  THE  SRECTAL  SYMBOL  KEYS.  THE  SIGNALS  FOR  SEVERAL  CONTROL 
FUNCTIONS  DIFFER  FROM  MOST  INTFRAOTTVF  TFRMTNALSt 

aotton  opera rioN 

ABORT  THE  CURRENT  COMMAND  •'BREAK” 

RBCKSPACF  a CHARACTER  "RUBOUT" 

CANCEL  A LINE  CTRL-U 

when  USED  AS  AN  INTERACTIVE  TYPEWRITER  TERMINAL,  TWO  COLUMNS  OE 
COMMANnS  WILL  RF  ACCUMULATED  ON  THF  SCREEN  UNLESS  THE  USER  DEPRESSES 
THE  “RESET  PA'.P"  KEY.  USER  MUST  RESET  PACE  TO  ALLOW  NEXT  SCREEN  TULL 
OP  DATA  TO  APPEAR  WHEN  LISTING  OUTPUT.  BEFORE  USING  GRAPHING  ROUTINES 
ENTER  "SCPEFN(«0,f.F»  command. 

CLOTTING  ROUTINES  OF  THF  PLOT  10  PACKAGE  ARF  lU  FILE  '*Tt^49■•. 

RFFFPFNCFSt 

CLPT-IA  terminal  CONYPOL  SYCTF*^  USERS  MANUAL  0b?-l474-00 

PLOT-10  ftOVANOrn  r.DARHTNG  IT  USER''  MANUAL  Qh?-1  530-00 


JUNF  1977 


PAGE  fi-9 


***  TEKTOONIX  4E.E2  ^LO  T T EP /O I & I T I 7ER  *»» 

THE  TEKTRONIX  4f>62  PL  CT  TER  / PI  GI  T 1 7ER  MAY  BE  USED  ON  A 30C-BAUD  LINE 
WITH  TERMINALS  SIMILAR  TO  FXECUPO»T  300,  HA7ELTINE  1000  (RS-?3?-C 

INTEREACE)  as  a den  PLOTTER  USING  THE  TEKTRONIX  PLOT  10  PACKAGE,  OP 
AS  AN  ALPHAMERIC  < CH AR ACTE R ASCII)  HARO  COPY  DEVICE.  IT  MAY  ALSO 
BE  DSEP  AS  A HARO  COPY  DEVICE  ON  A TEKTRONIX  4001. 

SEVERAL  SOEIWARE  PACKAGES  MAY  RE  USED  WITH  THE  4bG2.  THE  PLOT  10 
PACKAGE  IS  LIBRARY  “TEK30~  CONTAINING  200  SUBROUTINES  FOR  USE  WITH 
TEKTRONIX  401X  STORAGE  TUBE  TERMINALS.  SPECIAL  SUBROUTINES  SUCH  AS 
-PLCN"  ANO  ••PLOEE",  OIGITI7ER  CALL  BUTTON  AND  OTHER  SOETWAPE  EQR  THE 
SPECIAL  EEATUPES  OF  THE  4GG2  IS  IN  USER  LIBPARY  "TEKRCG?".  REEERENCE 
IS  ••4GF.2A01  PLOT  10  UTILITY  ROUTINES  EOR  USE  WITH  THE  46G2  PLOTTER 
USER  MANUAL”.  MOST  PROGRAMS  WRITTEN  EOR  11-TNCH  CALCOMP  DRUM  PLOTTERS 
MAY  PE  OUTPUT,  WITH  NO  PROGRAM  MO  01 E I C A TI ON , TO  TEKTRONIX  TERMINALS  BY 
suitable  LIBRARY  REPLACEMENT.  BECAUSE  THERE  ARE  DUPLICATE  ENTRY  POINTS 
IN  THE  ASSOCIATED  LIBRARIES,  THE  LOSFT  MUST  FOLLOW  THE  SPECIFIED  ORDER 
OF  LIBRARIES. 

• • • 

ATTACH, TEK30. 

A TTACH, IEK4bb2. 

ATTACH, CALC03G. 

LOSFT,LIB=TFK4bb?/IFK30/C ALC936. 

COMPLETE  ppoGPAMS  AVAILABLE  INCLUDE) 

“CAMVGCONTTSK,  in  = CAMV,  THF  UNIVERSITY  OF  CALGARY  GENERAL 
PURPOSE  CONTOURING  PROGRAM  (SEE  -CONTOUP  ID  A DEVISED 
surface  ETTTTNG  and  mapping  PROGRAM",  CMD-76-2b). 

"CAMVPLT4bE.2,  ID  = CAMV" , A POSTPROCESSOR  FOR  THF  "IMAGE"  AND 
"lOFAL”  HARDCOPY  FTLFS. 

THF  PLOTTFR  IS  TURNFD  ON  BY  ROCKING  THE  POWER  SWITCH  TO  THE  RIGHT. 
BE  SURF  TO  REMOVE  THE  ppOTFCIIVE  CAP  FROM  THE  SMALL  FELT  TIP  PEN.  THE 
4E>E?  CONTPOL  SWITCHES  ARE  NORMALLY  SET  TO  "0221"  (TERMINAL  MUTE, 

PS-232  intereacr.  Device  a,  300  baud),  depress  load,  place  one  sheet 

OF  11  PY  17  INCH  PAPER  ON  THR  PIATFN  AND  SMOOTH  IT  ELAT-  PRESS  LOAD 
AGAIN  ID  release  BUTTON  AND  BUILD  UP  ELECTRO-STATIC  CHARGE.  WHEN  LOAD 
BUTTCN  IS  DOWN,  NO  OUTPUT  ON  THE  TPRMINAL  SC0°E  IS  TRANSMITTED  TO  THE 
PLC  tied. 

PAPDWADP  PAGP  SPALE  margins  MAY  BE  SET  USING  THE  JOY  STICK  WHEN 
ONLY  THE  LOCAL  BUTTON  IE  DEPRPSSED.  FIRST  POSITION  TO  THE  DESIPED 
LOWER  LEFT  CORNER  flMn  PRESS  THE  SET  LOWER  LEFT  BUTTON  UNTIL  IT  BEEPS 
(1  SECOND),  THEN  POSITION  TO  THF  O'SIPFD  UPPER  RIGHT  CORNER  AND  SET  IT 
similarly.  THEN  CHECK  THE  SETTINGS  OF  THE  CURRENTLY  nEFINED  PAGE  BY 
PPFESING  in  SeoUENCE  the  LOCATE  BUTTONS.  WHEN  USED  IN  THE  PLOT  MODE, 
THF  MflOGINS  may  ALSO  BF  SET  BY  SOFTWARE  TN  THF  PLOT-IT  PACKAGF.  IN 
LOCAL  MODE  the  keybdapD  OE  THF  ATTflrHEn  terminal  INPUTS  ONLY  TO  IMF 
PLCTTEP,  not  DVEO  the  LTNE  TO  THE  COMPUTER. 


jut'F: 
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Tn  Tmt  dlottE^  as  a harp  copy  alphameric  device  for  the 

INTERArTTVP  TfPMlMAL,  Tmt  LOCAL  AND  LOAD  DUTTONS  MUST  BOTH  BE  UP. 

«;Y7P  of  ppjvjirn  LETTFPS  is  scaled  automatically  by  the  MARGIN  SETTINGS 
TO  ALLOW  8S  characters  PEP  LINE  AND  3S  LINES.  UNLESS  THE  SCREEN 
COhkanp  is  used,  rOMPUTER  OUTPUT  LINES  WILL  NOT  EXCEED  72  CHARACTERS. 
charactfps. 

THE  plotter  may  be  used  AS  A GIN  (GRAPHIC  INPUT)  DIGITIZER  DEVICE 
BY  USING  A SPECIAL  CROSS  HATP  MAGNTEIEP  INSTEAD  OF  THE  BALL  POINT  PEN. 

EOP  EUPTHEP  TNEORMAEION  CONTACT  MEL  HAAS,  CODE  1843,  (202)  227-1933. 
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INTERCOM  4 

INTERCOM  PERMITS  SIMULTANEOUS  REMOTE  ACCESS  TO  THE  CENTRAL  COMPUTER 
RESOURCES  IN  AN  INTERACTIVE  MODE  FOR  USERS  AT  TELETYPE-COMPATIBLE  OR 
MEDIUM  SPEED  REMOTE  BATCH  TERMINALS.  INTERCOM  OPERATES  CONCURRENTL '' 
WITH  THE  BATCH  MODE  ACTIVITY  AT  THE  CENTRAL  COMPUTER  SITE  AND  GIVES 
TERMINAL  USERS  THE  ABILITY  TOt 

-CREATE  PROGRAMS  BY  ENTERING  SOURCE  STATEMENTS  AT  THE  TERMINAL. 

-CREATE,  STORE,  REFERENCE  AND  EDIT  DISK  FILES. 

-SUBMIT  FORTRAN  EXTENDED,  COBOL,  MARS,  ALGOL  (THE  SAME  COMPILERS  AS 
USED  FOR  REGULAR  BATCH  JOBS),  OR  BASIC  PROGRAMS  FOR  COMPILATION 
AND  FXECUTION  UNDER  INTERCOM  CONTROL. 

-CONVERSE  INTERACTIVELY  WITH  EXECUTING  PROGRAMS  FROM  THE  TERMINAL. 

-SUBMIT  JOBS  TO  THE  NOS/BE  BATCH  QUEUE  FOR  PROCESSING. 

-ENTER  NOS/BE  CONTROL  CARDS  (UTILITIES)  FOR  PROCESSING. 

INTERCOM  PROVIDES  FACILITIES  WHICH  HAVE  BEEN  PROVIDED  IN  THE  PAST 
BY  TIME  SHARING  SERVICES  SUCH  AS  GE ♦ MATRIX,  CPS.  THE  COMMANDS  AND 
FACILITIES  ARE  DESCRIBED  IN  DETAIL  IN  THE  INTERCOM  REFERENCE  MANJAIS 
(SEE  CCRM,  I) . 


•••  SIGN-ON  PROCEDURES 


ALL  INTERCOM  USERS  MUST  REGISTER  PASSWORDS  (JOB  ORDER  NUMBERS)  WITH 
CODE  1B92  BEFORE  THEY  MAY  HAVE  ACCESS  TO  THE  SYSTEM. 

MOST  INTERACTIVE  TERMINALS  ARE  CONNECTED  TO  THE  CENTRAL  SITE  BY 
DATA  SETS.  IF  THE  TERMINAL  IS  UNDER  CENTREX  (AT  CAPOEROCK,  227  IS 
CENTREX),  DIAL  9 FIRST.  MANY  PORTS  ARE  AVAILABLE.  IE  THE  COMPUTER  IS 
DOWN  during  prime  SHIFT,  THE  TERMINAL  MAY  AUTOMATICALLY  TRANSFER  TO  THE 
RECORDED  STATUS  MESSAGE. 

THE  FOLLOWING  PHONE  NUMBERS  ARE  OF  INTEREST  i 

(301)  ??9-6000  6600  COMPUTER  — 300  AND  110  BAUD  iNTtRACTIVE 

(301)  B29-6610  6600  COMPUTER  — 300  AND  110  BAUD  INTr.RACTIVl 

(301)  229-6622  RECORDED  COMPUTER  STATUS  MFSSAGF 
(202)  227-1907  USER  SERVICES  FOR  ASSISTANCE 

WHEN  A terminal  IS  CONNECTED,  THE  USER  MUST  ENTER  CAPr.lAGE  RE1URN 
TO  establish  the  baud  RATE  ( 300  OR  110).  '^HEN  THF  SYSTFH  PFSPriNDS  k'lTu 
DATF  AND  TIME  GREETING.  THE  USER  BEGINS  THE  SESSION  BY  TYPING 

LOGIN.  THE  PERIOD  IS  OPTTONA; 


IN  RESPONSE  TD 
ENTER 

WHERE  XXXX  IS  THF  USE 
YYYYYY  IS  THE  USE 
IN  RESPONSE  TO 
ENTFR,  IN  THE  RLACKFNED 
WHICH  the  session  IS  TO 
NAMF/PASSWORD  COMBINATI 

sfveral  job  numbers,  he 


FNTEP  USER  NAME- 
XXXXVYYY YY 

R*S  installation  and  REG 
P»S  LAST  NAME  (OR  FIRST 
WWWMMMWMWM  ENTFR  PASSW 
PASSWOPD  SPACE,  the  RE 
BT  CHARGED.  ONLY  PREVI 
ONS  WILL  BE  ACCEPTED.  I 
MUST  REGISTER  EACH  WITH 


TSTE 

RED 

US 

LR 

j 

SIX 

char 

AC 

Tt 

R 

ORO- 

GIST 

FRED 

P 

AG 

SK 

OUSL 

Y RE 

GI 

GT 

ER 

E A 

USER 

D 

nr 

S 

CODE  l« 

9? 

• 

NIT  I 

AL  S, 

OF 

ITT. 

ORC 

TO 

ED  U 

Sf  P 

- OR< 

UNOF 

R 


TO  SPEED  UP  THE  LOGIN  PROCESS,  A SHORT  FORM  IS  AVAILABIEJ 

LOGIN, XXXX VYYYY Y, SUP 


IN 

PAGE). 


AODITTON,  A USRR  TURNKEY  PASSWORD  MAY  RE  REQUIRED  (SfF  NEXT 
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USfP  TURNKEY  PASSWORD  *•* 

AN  ADDITIONAL  LEVEL  OF  SFCUPITY  IS  AVAILABLE  THROUGH  THE  USE  OF  THE 
INTERCOM  'TURNKEY*  COMMAND  WHICH  WILL  DEFINE  A 1-  TO  D-CHARACTER  USER 
TURNKEY  PASSWORD  WHICH  MUST  BE  ''RFCIFIED  AT  FUTURE  LOGINS  UNTIL  CHANGED 
OR  RPMCVED.  THE  TURNKEY  IS  A USER  OPTION  WHICH  OFFERS  PROTECTION 
AGAINST  UNAUTHORIZED  CHARGES  TO  THE  USER'S  INTERCOM  ACCOUNT.  IT  SHOULD 
BE  CHANE.EO  FROM  TIME  TO  TIME.  THE  INTERCOM  TURNKEY  DOES  NOT  AFFECT 
PEPMANC-NT  FILES  OP  BATCH  USAGE. 


WHEN  A USER  TURNKEY  PASSWORD  HAS  BEEN  DEFINED,  LOGIN  (BOTH  LONG  AND 
SHORT  FORMS)  WILL  INCLUDE  THE  AODITIONAL  REQUESTt 

KWMMMNMHN  ENTER  TURNKEY  PASSWORD 

enter  your  current  TURNKEY  IN  THE  BLACKENED  SPACE. 


TtH^  turnkey  command  HAS  THE  FOLLOWING  FORMS) 

TURNKEY,NEW  = NP'WIKPASS 

DEFINE  A TURNKEY  WHEN  NONE  CURRENTLY  EXISTS. 

turnkey,old=olotkpass,nfw=newtkpass 

TUPNKEY ,NEW=NEWTKPASS,OLO=OLOTKPASS 

REOEEINE  AN  EXISTING  TURNKEY.  BOTH  OLD  AND  NEW  TURNKEYS 
MUST  BE  GIVEN. 

turnkey ,OLO=OLOTKPASS,NEH=NULL 
TURNKEY, NFW= NULL, OLD=OL DTK PASS 

PEMOVE  A TURNKEY.  THE  OLD  TURNKEY  MUST  BE  GIVEN. 

•OLCTKPASS*  and  'NEWTKPASS*  are  any  COMBINATION  OE  1-9  LETTERS  AND/OR 
DIGITS  (IE  NO  TURNKEY,  USE  'NULL*). 

IE  'TURNKEY*  IS  SPECIFIED  WITHOUT  ARGUMENTS,  THE  USER  WILL  THEN  BE 
BE  EPOMPTED  FOR  PASSWORDS  AS  FOLLOWS! 

W)»WWWM)tWW  ENTER  OLD  TURNKEY  PASSWORD 
MKHWWMMMM  ENTER  NEW  TURNKEY  PASSWORD 

enter  the  requested  turnkeys  in  the  blackened  SPACE. 


USE  OF  THE  TUPNKFY  is  OPTIONAL,  BUT  ONCE  DEFINED,  THE  USER  MUST 
RFMEvreR  !T,  since  thE  COMPUTER  CENTER  MAS  NO  RECORD  OE  IT.  IE 
FOPrCTTEN,  THE  INTERCOM  10  MUST  BE  TOTALLY  REPLACED  BY  USER  SERVICES  TO 
CLEAR  THE  TURNKEY,  A CUMBERSOME  PROCESS  WHICH  USUALLY  REQUIRES  2 DAYS. 
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***  COP'^FCTING  ANO  I NT  FPR  UP  T I NO 

I.  in  DFLFTF  A CHARACTFR,  TYPE  CTRL  RUTTON  AND  THE  LETTER  H 
SIMULTANEOUSLY,  THEN  RETYPE  THE  CHARACTER.  (SEE  NOTE  1) 

P.  TO  CANCEL  THE  ENTIRE  CURRENT  LINE,  HOLD  THE  CONTROL  BUTTON  WHILE 
TYPING  X.  PETY'^E  THE  LINE  CORRECTLY.  (SEE  NOTE  1) 

3.  TO  EXIT  EDOM  THE  CURRENT  COMMANDt 

- IE  THP  <;YSTEH  is  typing,  hit  esc  key  (OR  ANY  SINGLE  CHARACTFR), 
THEN  PERCENT  A,  THEN  RETURN 

- IF  THE  SYSTEM  IS  NOT  TYPING,  ENTER  PERCENT  A,  THEN  RETURN. 

AFTER  USER  ABORT,  I HE  SYSTEM  WILL  REPLY  COMMAND-  OR  ..  FOR  THE  NEXT 
COMMAND. 

4.  HITTING  THE  ESC  KEY  (OP  ANY  SINGLE  CHARACTER)  FOLLOWED  BY  PERCENT  S 
AND  RETURN,  WILL  JUMP  TO  THE  NEXT  BUFFER,  BUT  WILL  NOT  ABORT  EXECUTION 
OF  '•HE  CURRENT  COMMAND. 

5.  TO  DELETE  A LIT’E  FROM  THE  EDIT  FILE,  THE  DELETE  COMMAND  MUST  BE 
USED. 

6.  WHEN  ANY  EDITOR  COMMAND  GIVES  LOADER  ERROR,  CHECK  THAT  IT  WAS  NOT 
INCORRECTLY  TYPED  WITH  A PERIOD  (.)  AT  THE  END. 

7.  IF  A USER  IS  ACCIDENT A_LY  DISCONNECTED  FROM  THE  TTY  (E.G.,  HIT  EOT, 
CTPL-D,  BY  MISTAKE),  HE  WILL  BE  ABLE  TO  LOGIN  WITHIN  IS  MINUTES  WITH 
ALL  FILES  PRESERVED.  IF  UNDER  EDITOR,  THE  TEXT  BUFFER  WILL  BE  INTACT. 

8.  TO  ENTER  ANY  COMMAND  FROM  KEYBOARD  WHILE  IN  ‘TAPE, ON*  MODE,  THE 
USER  MUST  END  THE  LINE  BY  CARRIAGE  RETURN,  LINE  FEED,  X-OEF  (HOLD  CTRL 
KEY  WHILE  TYPING  LFTTEP  S). 

R.  IF  EXECUTION  OF  A COMMAND  OR  DIRECTIVE  EXCEEDS  DO  CPU  SECONDS,  THAT 

command  is  aborted. 

10.  WHEN  CURRFNT  EDITOR  FILE  HAS  NOT  BEEN  SAVED,  'BYE'  OR  'CREATE'  OR 
'<^CIT'  COMMANDS  WILL  NOT  BE  ACCEPTED  UNTIL  TYPED  A SECOND  TIME. 

II.  WHCN  A PROGRAM  ACCEPTING  INPUT  FROM  THE  TTY,  SIMULATE 
END-CF-RFCORD  OR  EnO-OE-FILF  BY  ENTERING  °ERCENT  EOR  OP  PERCENT  EOF, 
PESPECTIVEL Y.  ID  SIMULATE  EN D-OE - I NEOR M A T I ON , ENTER  PERCENT  EOF 
TWICE.  THIS  ALLOWS  THE  USER  TO  ENTER  DATA  FOR  PROGRAMS  (BOTH  USER 
PPCGPAMO  AND  SYSTEM  PROGRAMS  SUCH  AS  EDTTLIB,  UPDATE,  ETC.)  DIRECTLY 
AT  THF  teletype.  THIS  EEATUPF  IS  NOT  THE  SA^E  AS  *rOR  AND  »EOE,  WHICH 
ADE  L'FFP  WHEN  CPEATTNG  FILES  IN  EDTTOP. 

17.  FILE  NAMFG  BEGINNING  WITH  '77777*  ARE  RESERVED  TO  NOS/BE  1.0  AND 
SHCULD  BE  AVOIDEO  BY  THE  USEP. 


NOTE  It  the  CAPRIAF.F  WILL  NOT  mqvF  , NQP  WILL  A CHARACTER  BE  TYPED  *0 

TNDirnTE  voiio  rOPPECTION.  THE  USE°  MUST  K‘'f  D TR|,D<  OF  WHAT  HE 
IS  DOING. 
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»»»  INTTrcOM  UGFP  LIMITATITN'^  »♦* 

RPGISTPATTON  OF  A JOB  OROFR  NUMBFP  FOR  HATCH  RUNS  IS  A PPFPFaUISITE 
POP  INTPPCOM  IJPACF.  TN  AOOITION,  FACH  INOlVinUAL  MUST  PFCFIVF  INTERCOM 
TPAIMK'C  ANO  ofi^cjwoPO  ASSIGNMENT, 

THE  RUN  compiler  (FORTRAN)  SHOULD  NOT  HE  USED.  ALL  LIBRARY 
PPOFPAMS  ON  TMF  SYSTEM  FILE,  EXCEPT  THOSE  IN  THP  FORTRAN  MANUAL 
APFENOTV  n,  APE  CALLABLE  ONLY  BY  FORTRAN  EXTENDED  (ETN). 

CERTAIN  compilers  NOMINALLY  CALLABLE  FROM  INTERCOM  PEOUIPE  FIXED  OR 
minimum  field  lengths  larger  than  THOSE  AVAILABLE  TO  GENEPAL  USERS. 
THERE  TNCLUOF  MARS  VI  WITH  UPDATE  VEPR,  SNOBOL,  FTN  WITH  DEBUG  PACKETS. 

MAXIMUM  CPU  TIME  PER  COMMAND  OR  PROGRAM  EXECUTION  IS  90  SECONDS. 
MAXIMUM  CORE  TO  LOAD  A USER  PROGRAM  EOP  EXECUTION  IS  BIOOO  OCTAL  WORDS. 
PEPMTS'‘IDN  TO  ALTER  FIELD  LENGTH  UP  TO  61000  OR  TIME  LIMIT  jp  to  600 
OCTAL  SFCONOS  OF  6400  TIME  IS  GPANTEO.  (SEE  CCRM,  9-16) 

WHFN  A FILE  USPD  DUPING  A SFSSION  IS  NO  LONGER  NEEDEO,  TYPE  IN 
RETURN, LEN  TO  OELETE  TT  EROM  USE®  LOCAL  FILES.  IT  IS  ESPPCIALLY 
TMPCRTANT  TO  RETURN  PERMANENT  FILES  AS  SOON  AS  POSSIBLE  SINCE  THERE  IS 
A TCTAL  system  MAXIMUM  OF  200  ATTACHED  PERMANENT  FILES  AT  ANY  ONE  TIME. 
exceeding  THIS  WILL  HANG  THE  SYSTEM  FOR  ALL  USERS. 

USE  OF  THE  ASSETS  OP  SUMMARY  COMMANDS  WHILE  IN  EDITOR  WILL  NOT 
INCLUDE  THE  CP  TIME  OF  THE  CURRENT  EDITOR  SESSION  IN  THE  TOTALS. 

ATTEMPT  TO  LOGIN  WHEN  INTERCOM  IS  NOT  AVAILABLE  OR  SYSTEM  IS  HUNG 
R SULTS  IN  A DATA  TONE  THAT  DROPS  OUT  OR  TYPE  HEAO  CHATTERS  WITH  NO 
TYPING  OR  THE  PHONE  PINGS  WITHOUT  ANSWERING.  FOR  THE  SYST«-M  STATUS, 
CALL  (701)  ??9-6622  (THIS  IS  A RECORDED  MESSAGE). 

WHEN  THE  SYSTEM  HAS  GONE  DOWN  WITHOUT  NOTIFYING  USER  OR  BEFORE  USER 
COULD  CATALOG  CURRENT  LOCAL  FILES,  TRY  TO  LOGIN  AGAIN  IN  ABOUT  15 
MINUTES.  type  files  COMMAND  TO  SEE  IE  THE  USER  LOCAL  FILES  HAVE  BEEN 
RETAINED  FROM  PREVIOUS  SESSION.  IF  SO,  WORK  MAY  BE  CONTINUED  AND  FILES 
CATALOGED. 

AVOID  THE  TEACH  COMMAND  AS  IT  IS  NOT  EFEICIENT. 

PINAPy  PROGRAMS  BEING  EXECUTED  THROUGH  INTERCOM  MUST  NOT  BE 
ATTACHED  WITH  LOCAL  FILE  NAMES  IDENTICAL  TO  ANY  MEDIUM  SPEED  REMOTE 
BATCH  TFPmTnAL  commands.  AVOID  SINGLE  LETTER  NAMES,  AS  WELL  AS  THE 
commands  THESE  ABBREVIATE. 

ALL  ETLFS,  INCLUDING  THE  SPECIAL  FILES  INPUT,  OUTPUT,  PUNCH  AND 
PUNCMB,  APE  PETURNFD  AUTOMATICALLY  AT  LOGOUT. 

The  only  command  which  automatically  connects  INPUT  AND/OR  OUTPUT 
TS  TPF  fDTTOP  RUM  COMMAND.  * PUN , <C OMR  I LER> * CONNECTS  BOTH  INPUT  AND 
OUTPUT.  •PUN,<COMPILEP>,NOGO*  CONNECTS  OUTPUT. 
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PflPFP  TftPF  U5F 

TO  IJSF  '’Aofp  Tflpp  OP  IMPUT  TO  fl  RUNNING  PPOGRfl*^,  FACH  LINE  TO  RF 
PFflP  *‘UGT  TEP^^INATF  WITH  CAPRIAGF  PFTUPN,  LIN*^  FFFO,  THPFF  PUBCUTS,  ANO 
X-ORF  (HOUn  GTPL  KEY  WHILR  TYPING  S),  THEN  THRFF  OP  MORE  »UB0UTS.  IF  A 
nPMHANR  TO  INITIATE  EXECUTION  OF  THE  PPOGRAM  IS  THE  FIRST  THING  ON  THE 
PAPER  TAPE,  THE  TAPR  MAY  RF  PEADTEn  BEFORE  TYPING  'TAPE, ON*. 

OTHERWISE,  LEAVE  THE  TAPE  IN  FREE  OP  STOP  POSITION,  REPLY  TO  THE 
RY  TYPING  THE  INITIATE  EXECUTION  COMMAND  (E.G.  RUN,E)  FOLLOWED  BY 
CARRIAGE  RETURN  (-CR-),  LINE  FEED  (-LE-),  X-OFF.  THEN  PLACE  THE  TAPE 
IN  AUTO  MODE,  OR  WAIT  FOR  FIRST  INPUT  REQUEST,  ANO  PUSH  TAPE  LEVER  TO 
START. 

TO  READ  PREVIOUSLY  PREPARED  PAPER  TAPE  UNDER  EDITOR,  READY  THE  TAPE 
IN  THE  READER,  IN  THE  AUTO  POSITION  (JUST  ABOVE  STOP),  TYPE  *tAPE,ON*. 
THE  SYSTEM  HILL  RESPOND  WITH  ..  AND  START  TO  READ  THE  TAPE.  ON  MODEL 
15  TTY,  THE  TD  CALL-IN  BUTTON  MUST  RE  TURNED.  IF  THE  TAPE  DOES  NOT 
START,  USE  THE  START  LEVER  (TD  ON).  WHEN  THE  PAPER  TAPE  REACHES  THE 
ENDING  RUBOUTS,  IT  WILL  STOP.  IT  MAY  BE  MANUALLY  STOPPED  BEFORE  THAT 
OR  MAY  CONTAIN  THE  ENDING  COMMANDS.  TO  EXIT  FROM  THE  PAPER  TAPE  MODE, 
TYPE  'TAPE, OFF*  FOLLOWED  BY  CARRIAGE  RETURN,  LINE  FEED  AND  X-OFF. 

WHEN  IN  THE  TAPE, ON  MODE  ANY  COMMAND  TYPED  IN  ON  THE  CONSOLE 
MUST  RE  FCLLOWED  BY  CARRIAGE  RETURN,  LINE  FEED,  AND  X-OEF  BEFORE  IT 
WILL  RF  ACCEPTED  RY  THE  SYSTEM. 

RARER  TAPE  FOR  EDITOR  INPUT  MAY  BE  PREPARED  WITH  LINE  NUMBERS  ON 
T.R.,  105=  IPPOGRAM  SHORT!...)  THE  COMMAND  SEQUENCE  IS 

EDITOR 

D, A TO  CLEAR  EDIT  FILE 

TAPE, ON  and  ALLOW  THE  TARE  TO  READ  IN  IMMEDIATELY 

WHEN  PAPER  TAPE  FOR  EDITOR  INPUT  DOES  NOT  CONTAIN  ANY  LINE  NUMBERS 
(I.E.,  IPROGPAM  DTFE(...))  THE  COMMAND  SEQUENCE  ISt 

RDITCP 

TAPE, ON  PAPER  TAPE  MUST  NOT  RE  READY  IN  THE  AUTO  POSITION. 

C,E  -CR-,  -LF-,  X-OER  FOR  LINE  COUNTER.  THEN  START  the  PAPER  TAPE 

READING  AFTER  SYSTEM  RESPONDS.  TAPE  HILL  READ  TO  END 
END  SUPPLYING  AUTOMATIC  LINE  NUMBERS. 

= THIS  CHARACTER  ALONE  ON  A LINE  OR  AS  LAST  LINE  ON  PAPER 

TAPE.  IE  TYPEO  IN,  MUST  HAVE  -CR-,  -LE-,  X-OFE. 

TAPE, OFF  -C°-,  -LF-,  X-OFE 

L,A  list  WHOLE  PROGRAM  TO  CHEC)C  SYSTEM  ASSIGNED  LINE 

NUMBERS . 

after  TTPhtnATING  tape  pEAO  with  *TAPE,nFE*,  IF  THE  SYSTEM  DOES  NOT 
STEM  ir  ACCEPT  COMMANDS,  THEN  TYPE  X-OFR  AND  REPEAT  TAPE.OFp  SEQUENCE. 

• ••  THE  OPPPR  OF  line  feed  ANO  CARPIAGE  RETIJPN  IN  NOS/BE  1.0  IS  THE 

SAMT  AS  IN  SCOPE  1.4  AND  MU''T  BF  THE  REVERSE  OE  SCOPE  I . I CUSTOM. 
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•»»  PPOGRfiP  CTNSTPUCTION  - mi  TQP  »♦* 

FriTTOP  UGFD  TO  PPEATF  AND  MOOIFY  PPQGRAMS  AND  OTHER 

S'^0LFN‘'T  AL  FILES  AT  THE  TELETYPF.  ALL  FILES  SAVED  UNDER  FDITOR  ARE  ON 
PFPRANPNT  FILP  OEVIGE.  FILES  OF  GRFATFR  THAN  7?-0HARACTER  RECORDS  ARE 
ALLCKPH.  FACP  line  to  pf  MANIPULATED  BY  FOITOP  MUST  HAVE  A LINE  NUMBER 
PITHFR  SUPPLIFD  BY  THF  USER  OR  GENERATED  BY  EDITOR.  ANY  SOURCE 
LAf.GL'AGE  WHICH  SpECIFIE*"  CFRIAIN  COLUMNS  (E.G.,  FORIRAN  STATEMENTS  IN 
COLLMN  7)  MUST  fithfR  BE  SPACED  OUT  TO  THE  CORRECT  COLUMN  OR  USE  THE 
TAP  chARACTpr  C).  length  OF  LINES  AND  TAB  STOPS  ARE  SET  BY  THE 
•FORMAT'  COMMAND. 

ONLY  THE  LINFS  TO  BE  TYPED  BY  THE  USER  APPEAR  BELOW. 


FORTRAN 


EDITOR  ENTER  EDITOR  SUBSYSTEM 

CPFATF  SET  AUTOMATIC  LINE  NUMBER  GENERATION 

IPPOGRAM  FXAMPtINPlJT=i?»^,0UTPUT=l?B,TAPE5=INPUT) 

C AUTHOR  AND  ADDRESS 

C USES  LIST-DIPFCTED  I/O  FOR  COMMA  SEPARATED  UNFORMATTED  DATA 

:call  conned  (g) 

ICALL  CONNED  tGLOUTPiJT) 

!PRINT  •,  "TYPE  IN  A,B,<  ” 

7;PFA0(S,»)  A,B,< 

;TF  (A  .EO.  0.)  GO  TO  G 
: r=A  »*kfb 
:pPINT  ti,D,A.B,K 
4:FrEMAT(iy,iE7.p,l3> 

:go  to  ? 
g; STOP 
;fnd 


LIST, ALL 
SAVF.FNAMF 
RUN  ,FTN 


TURN  OFF  AUTOMATIC  LINE  NUMBER  GENERATOR 
LIST  FOR  PROOFREADING 
MAKF  USER  LOCAL  FILE 
EXECUTION 


BASIC 

EDITOR 

-lftf.all 
OPMAT, BASIC 

ino  REM  COMPUTE  AND  PRINT 
no  RFM  AUTHOR  AND  AODRESS 
1.?0  LET  P = B.1415B?GG 
130  FRTNT  •'  ENTER  X’“, 

14P  INPUT  X 
ISO  IF  X<=0  THFN  ?00 
IGO  LET  w ■=  SOP(P  * X) 

170  PRINT  ROOT  IS"  W 
ISO  GO  TO  1 10 
?0f!  FND 
RUN  .BASIC 


TO  CLEAR  EDIT  EILE 

ESTABLISH  BASIC  EDITING  FORMAT 


EXECUTION 
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CAPO  IMAGF  FOPTPAN  DfCK 


attach, TARns, I n=xxxx 

FOTTCR 

FHIT, CAPOS, SET 
L,  A 

90=:FPCGPAM  TFST(TNPUT= 
/STK/=/COS/, A,U 
/OUT/=/OUTPUT/,q3 
T, ?10, ??0 
L,  A 

S, NFWPPO 
RUN,F 

STCPF,MFWPRO, XXXX 


QPTNG  PERMANENT  FILE  TO  USER  PILES 

SEQUENCE  THE  DECK  POP  EDITING 
LIST  TO  CHECK  SEQUENCING;  THEN  EDIT 
1ZR,0UT=12«) 

TEXT  REPLACEMENT,  SIN  INTO  COS  CALLS 

CORRECT  FILE  NAME  IN  PROGRAM  CARD 

DELETE  LINES 

LIST  FOR  PROOFREADING 

MAKE  USER  LOCAL  FILE 

EXECUTE  REVISED  PROGRAM 

CATALOG  CORRECTED  PROGRAM 


EXECUTION  - EXTERNAL  FILES  REQUIRED 


RUN ,F, N 
DYE 

ATT  ACH, NSROC. 


CREATION  OR  EDITING  OP  USER  PROGRAM 
COMPILE  WITHOUT  LOAD  OR  EXECUTE 

MORE  EEEICIENT  TO  EXIT  EDITOR  3EP0RE  COMMAND  STRING 
GET  NEEDED  LIBRARY  (PERIOD  OPTIONAL) 


XPC,LD'^FT=LIB  = NSRDC,LOAD=LGO 


BINARY  PROGRAM  RUNS 


TO  RUN  A BINAPY  PROGRAM  FILE  INTERACTIVELY  FROM  INTERCOM,  AFTER 
ATTACHTNG  BE  SURE  THAT  THE  INPUT  AND  OUTPUT  FILES  ARE  CONNECTED  TO  THE 

ttpvxnal.  eithfo  use 

C0KN<-CT,  INPUT, OUTPUT  AS  A COMMAND  OP 

CALL  CONNEC  (SLINPUT)  AND  (SEE  PTN, 

PALL  CONNEC  (GLOUTPUT)  IN  PTN  PROGRAM.  ETN/S,  III-ll-l) 

TO  DETACH  A FILE  FROM  THE  TERMINAL,  USE 

CISCONT,LEN  AS  A COMMAND  DR 

call  oiscon  (lpn)  in  an  etn  progpam. 


I 


/ 

j 

i 

I 


'I 
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»*»  RATCH  OUNG  EPOM  TELETYPE  *** 

TC  PUN  A J09  THAT  pequIPF':  HOPE  THAN  GIOOO  CORE  LOCAriONS,  OVER  90 
CECCEOS,  PP  HAG  HUGH  OUTPUT,  BATCH  JOBS  MAY  BE  INITIATED  FROM  A TTY.  A 

CnwpLFTE  rONTPOL  CA»n  pecopc  must  be  constpucted  under  editor,  save 

THE  FTLP,  ISSUE  the  BATCH  OP  ROUTE  COMMAND.  TO  RETURN  JOB  OUTPUT  TO 
THE  TTY,  A OTSPOSE  OR  ROUTE  CARD  MAY  OCCUR  IN  THE  CONTROL  CARD  RECORD, 
OP  TpP  BATCH  COMMANO  HAY  INCLUDE  INPUT, HERE,  OP  THE  ROUTE  COMMAND  MAY 
TNCLL'DP  TlOrXX,  WHERE  XX  IS  THE  USER'S  TERMINAL  ID. 

example:  route, OUTPUT, nC=PR,TID=YB,FID=*.  (SEE  CCRM,  2-10)  -OR- 

OISPOSF, OUTPUT, PR= lYB.  (SEE  CCRM,  2-«) 

SENDS  all  data  CURRENTLY  IM  FILE  OUTPUT  TO  THE  TTY  OR  20  0'JT  YB. 


CREATION  OF  CONTROL  CARD  RECORD 


EDITCR 

C,S  ENTER  create  MODE  WITH  LINE  NUMBERS  SUPPRESSED 

UScrtp,CMB0000,TS00.  name  / CODE  (YOUR  JOB  CARD) 

CHAPCE,USFp, JJJJJJJJJJ, CC. 

attach, fnamf,to=xxxx. 

FTN,T=FNAHE.  WHFRE  FNAME  is  the  file  containing  FTN  SOURCE 

LCD. 

»FOP  WILL  generate  AN  END-OE-RECORO  (LIKE  7/B/9  CARO) 

(YOUP  INPUT  DATA  CAROS) 

• • • 

- TERMINATES  CREATE  MODE 

L,A  list  for  proofreading 

SAVE,SGPIJN,N  save  CTL  CDS  without  line  NUMBERS  FOR  BATCHING 

BATCH, SGRUN, INPUT, HERE  OR  ROUTE  SGRUN , OC  = I N , T I 0= X X , WHERE  XX  IS 

YOUR  TERMINAL  ID.  FOR  CENTRAL  SITE  INPUT 
OUEUE,  OMIT  *,HERE*  FROM  THE  BATCH  COMMAND 
OR  USE  TID=C  ON  THE  ROUTE  COMMAND 


TERMINAL  ACCESS  TO  BATCH  JOB  OUTPUT 

TO  FOLLOW  THE  PROGRESS  OF  A SUBMITTED  JOB,  USE  Q.XXXX  (CCRM,  9-10) 
OR  INTERCOM  FILES  COMMAND.  THE  (J  COMMANDS  DESCRIBED  IN  INT,  II-1-36, 
SHEULD  NOT  GENFPAI.LY  BE  USED  AT  INTERACTIVE  TERMINALS. 

WHPN  THE  REMOTE  OUTPUT  FILE  MATCHING  THE  FIRST  FIVE  CHARACTERS  OF 

ydl'R  jpp  name  arrears,  thf  job  has  been  executed,  to  bring  the  remote 

OUTPUT  INTO  A USER  LOCAL  FILE! 

BATCH, CASGTNN, LOCAL  WHERE  CASGTNN  IS  THE  7-CHARACTER  REMOTE 

JOB  NAME 

THF  PTLP  IS  NOW  AVAILABLE  FOR  PAGE  MANIPULATION  AT  THE  TERMINAL 
(SPP  Tur,  tT-1-71)  OR  EDITOR  USE. 


TO  send  OUTPUT  TO  A PRINTER  AFTER  TTY  SAMPLING 


REWIND, CASGTNN. 

ROUTE, r ASGTNN ,nC  = PR, T IO  = C, E ID  = *. 
RBUTE,CASGTNN,nC=PR,T IO=AA,ETO=* 


TO  central  site  -OR- 

WHERE  AA  IS  1700  OP  200UT  REMOTI  ID 
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» * » 


'.EAVING 


AND  RE-ENTERING 


EDI  TOR 


* * ♦ 


TO  GET  OUT  OF  EDITOR  AND  BACK  INTO  COMMAND  MODE,  EN 
THERE  TS  ANYTHING  IN  YOUR  EDIT  FILE,  IT  HILL  BE  RETAINE 
INTO  EDITOR.  THE  CURRENT  MODE  lEORTRAN,  BASIC,  ETC.), 
CHARACTER  ARE  ALSO  SAVED,  AS  IS  THE  NUMBER  OF  THE  LAST 
LISTED.  THEN,  IE  YOU  ENTER  EDITOR  AGAIN,  THE  MESSAGE 
EXISTING  EDIT  FILE  MILL  BE  TYPED  AND  YOUR  LAST  EDIT  FI 
SETTINGS  HILL  BE  AVAILABLE.  NOTE  THAT  IT  IS  MORE  EEEIC 
FROM  EDITOR  BEFORE  DOING  A STRING  OF  NOS/BE  COMMANDS. 


TER  BYE.  IE 
D FOR  NEXT  ENTRY 
CH,  TABS  AND  TAB 
LINE  ENTERED  OR 
YOU  HAVE  AN 
LE  AND  ALL 
lENT  TO  EXIT 


***  INTERCOM  BACKUP  DECKS 

TO  create  a backup  deck  from  an  INTERCOM  SOURCE  CODE  PERMANENT 
FILE  THROUGH  TELETYPE  INPUT  - 

ATTACH, TEMP, ANY, ID=XXXX.  GET  YOUR  FILE 

PATCH, TEMP, PUNCH, XXXX 

THE  SYSTEM  HILL  COPY  THE  PF  AND  PUNCH  IT.  DECK  WILL  HAVE  BANNER  CARD 
•IXXXXNN*  WHERE  XXXX  IS  USER'S  INITIALS.  IE  IT  IS  DESIRED  TO  PUNCH 
AT  A 1700  INSTEAD  OF  CENTRAL  SITE  - 

ATTACH, TEMP, PEN, 10= XX XX. 

COPYE, TEMP, DISK 

ROUTE , DISK, OC=PU, TIO=AA,FIO=»XXXX.  SEE  CCPM,  12-1  FOR  AA  VALUE 

IN  THIS  CASE,  THE  BANNER  CARO  HAS  'XXXXONN'. 


SIGN-OFF  PROCEDURES 


AT  TERMINATION  OF  SESSION  OR  WHEN  REQUESTED 
TYPE  'LOGOUT.'  (THE  PERIOD  IS  OPTIONAL).  USER 
LOGOUT.  A TIME  SUMMARY  OF  THE  SESSION  AND  ESTI 
PRINTED.  WHEN  THE  SUMMARY  HAS  COMPLETED  PRINTI 
BY  TURNING  OFF  THE  TELETYPE  AND  HANGING  UP  THE 
BUTTON)  UNLESS  ANOTHER  USER  IS  WAITING  TO  LOGIN 


BY 

CENTRA 

L 

OPE 

R 

A 

TOR, 

MUS 

T ' 

BYE 

, 

EDI 

T 

0 

R BEFORE 

MAT 

ED 

COS 

T 

WIL 

L 

BE 

NG, 

FI 

NTS 

H 

THE 

s 

IGN-OFE 

DAT 

A 5 

ET 

(P 

USH 

T 

ALK 

SYSTEM  BULLETIN  *»* 

A SYSTEM  bulletin  WILL  BE  TYP>^0  AT  LOGIN  TIME  UNLESS 
'LOGIN, XXXXYYYYYY,JJJJJJJJJJ, SUP'  WAS  USEO.  SYSBULL  MAY  BE  EXECUTED  AT 
ANY  POINT  IN  THE  INTERCOM  SESSION.  ' CONNECT , OU TPU T ' IS  REQUIRED  TO 
PPTNT  AT  TTY  ( »S YSBUL L , L OG I N » WILL  ALWAYS  PRINT  AT  TTY).  (SEE  CCPM, 
2-71  SYSBULL) 
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LOCATING  JOBS 
0 COMMAND 

THE  *Q»  COMMAND  LISTS  JOBS  IN  THE  VARIOUS  QUEUES  OF  THE  MAINFRAME 
ON  MHICH  THE  USER  IS  EXECUTING.  TO  EXAMINE  THE  QUEUES  OF  OTHER 
MAINFRAMES,  SEE  THE  * OS  * COMMAND  ON  THE  NEXT  PAGE. 

0 LIST  NUMBER  OF  JOBS  IN  INPUT,  OUTPUT,  EXECUTE,  PUNCH  AND 

JANUS  ICENTRAL  SITE  RF AO/PRI NT/PUNCH ) QUEUES. 

Q,JPK  LIST  NAMES  OF  JOBS  IN  INPUT,  OUTPUT,  EXECUTE,  PUNCH  AND 

AND  JANUS  QUEUES.  JBN  IS  THE  FIRST  3-7  CHARACTERS  OF  THE 
JOB  NAME. 

Q,JBN,X  LIST  JOBS  IN  THE  QUEUE  SPECIFIED  BY  X WHOSE  NAMES  BEGIN 

WITH  JBN.  JBN  IS  3-7  CHARACTERS  AND  X HAS  ONE  OF  THE 
FOLLOWING  VALUES* 

I - INPUT  QUEUE 
0 - OUTPUT  QUFUE 
E - IN  EXECUTION 
P - PUNCH  QUEUE 
J - JANUS  QUEUE 

APPROPRIATE  STATISTICS  ARE  PROVIDED. 

Q,S  SUMMARY  OF  HOW  TO  USE  THE  Q COMMAND. 

NOTE*  MOST  'O*  LISTS  INCLUDE  THE  MAINFRAME  <MFA=6700,  MFB=6600, 
MFC=6«*00). 


Q, CASG 
0,CASG,I 

Q,IPA 

C,TPA,0 


EXAMPLES 

LIST  ALL  JOBS  SUBMITTED  BY  USER  CASG 

LIST  ALL  JOBS  SUBMITTED  BY  USER  CASG  MHICH  ARE  IN 
THE  INPUT  QUEUE 

LIST  ALL  ROUTED  FILES  OF  USER  PA 

LIST  ALL  POUTED  OUTPUT  FILES  OF  USER  PA 


JUNF  1977  PAGE  9-11 


QS  COMMAND 

THE  'QS*  COMMAND  IS  USED  TO  EXAMINE  THE  QUEUES  ON  THE  USER'S  AND 
OTHER  MAINFRAMES.  ALL  PARAMETERS  ARE  OPTIONAL  AND  MAY  BE  GIVEN  IN  ANY 
OPDFR. 

as, JCBNAME, FORMAT, TIO, SID, TOTALS, QID 

JOBNAMF  - FIRST  4-7  CHARACTERS  OF  DESIRED  JOBNAME 
(UP  TO  5 JOBNAMES  MAY  BE  SPECIFIED) 

FORMAT  - R OR  OMITTED  - BRIEF  LISTING  (DEFAULT) 

V - VERBOSE  LISTING 

TIO  - TERMINAL  ID  TO  BE  EXAMINED 

OMITTED  - THE  USER'S  TERMINAL  ID 
AL  - ALL  TERMINAL  ID'S 

AA  - WHERE  AA  IS  ANY  2-CHARACTER  TERMINAL  ID 

SID  - SITE  ID 

MFA  - 6700 

MFR  - 6600  (DEFAULT) 

TOTALS  - TOT  - LIST  QUEUE  TOTALS 

OMITTED  - DO  NOT  LIST  QUEUE  TOTALS 
DIO  - QUEUE  TO  BE  EXAMINED 

OMITTED  - ALL  QUEUES 

T - INPUT  QUEUE 

T - TAPE  JOBS  IN  INPUT  QUEUE 

0 - OUTPUT  QUEUE 

E - EXECUTE  QUEUE 

P - PUNCH  QUEUE 

C - PLOT  OUTPUT  QUEUE 


EXAMPLES 

QS,TCT  LIST  MFB  QUEUE  TOTALS 

(QS,TOT,AL  WILL  LIST  ALL  THE  MFB  QUQUES  AND 
THE  TOTALS) 

QS, TOT, MFA  LIST  MFA  QUEUE  TOTALS 

QS,VFA  LIST  ALL  MFA  JOBS  IN  USER'S  OWN  QUEUES 

QS,XXXX, AL,MFA  LIST  ALL  MFA  JOBS  SUBMITTED  BY  USER  XXXX 

OS, XXXV, I, AL, MFA  LIST  ALL  MFA  JOBS  SUBMITTED  BY  USER  XXXX  WHICH 

ARE  IN  THE  INPUT  QUEUE 

QS,TFAn  list  all  MFB  ROUTED  FILES  OF  USER  IPA  AT  THIS 

terminal  ID 

(NOTE)  4-CHARACTFR  MINIMUM  JOB  NAME) 

Q- , IPAn  , y V YX , AL  LIST  ALL  MFR  JOBS  FOR  USER  XXXX  AND  TERMINAL  ID 

PA 


Q^,yFA,T, V, PA, XXXX 


LONG  (VERBOSE)  LIST  OF  ALL  TAPE  JOBS  <^OR  XXXX  IN 
MFA  IN  THE  QUEUES  FQP  TERMINAL  ID  PA 
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***  MTSSAGES  9PTWEFN  CONSOLES  *»* 

EPOM  CENTPAL  SITE  OPERATOR 

THCSP  MESSAGES  MAY  NOT  9E  AVOIDED  BY  THE  COMMAND  LOCKtON. 

THPY  WILL  o(?XNT  IMMEDIATELY  EVEN  IE  A PROGRAM  IS  IN  EXECUTION,  THEN 
PUN  WILL  RESUME.  ALL  MESSAGES  BECOME  PART  OE  THE  DAYFILE  PECORD. 

ALL  MESSAGES  FROM  THE  OPERATOR  ARE  PRECEDED  BY  THE  TIME  THE  MESSAGE  HAS 
SENT  T'^EE  example  AT  BOTTOM  OF  PAGE). 

CERTAIN  FREQUENT  MESSAGE  PATTERNS  ARE t 

PL^  LOGOUT  GOING  DOWN 

duration  of  interruption  USUALLY  LONGER  THAN  15  MINUTES. 
OFTEN  MAY  NO’  PE  ABLE  TO  SAVE  OR  CATALOG  FILES  AS  SYSTEM 
MAY  RE  TOTALLY  HUNG. 

•*,  PLS  LOGOUT  IN  XX  MIN 
•*,  ELS  LOGOUT  NOW 

INTERCOM  MUST  PE  DROPPED  FOR  A FEW  MOMENTS.  CATALOG  FILES 
AND  LOGOUT  AS  SOON  AS  POSSIBLE.  NOTE  THAT  THERE  MAY  NOT 
PE  ENOUGH  TIME  TO  CATALOG  BEFORE  INTERCOM  IS  DROPPED. 

**,  INTPPCOM  OFR  IN  XX  MIN 

approaching  the  end  of  the  shift  IN  WHICH  INTERCOM  IS 
AVAILABLE.  BEGIN  TO  CATALOG  FILES  AND  LOGOUT  WITHIN  XX 
MINUTES. 

*»,  FL*^  PURGE  UNNEEDED  FILES 
FLS  RETURN  UNNFFDED  FILES 

DISK  FILE  SPACE  IS  FILLED.  RETURN  LOCAL  FILES  THAT  ARE  NO 
LONGER  RFQUIRED  AND/OR  PURGE  (AND  RETURN)  SOME  FILES. 

**,  mAthINE  in  step  for  5 MIN 

RESPONSE  MAY  BE  VERY  SLOW  OR  SEEM  NONEXISTENT  FOR  A FEW 
MINUTES.  DEADSTAPT  IS  NOT  YET  PLANNED.  BE  PATIENT  FOR  2 
TO  in  MINUTES. 


IF,  INSTEAD  OF  •*,  THE  MESSAGE  CONTAINS  A USER  ID,  IT  IS  NOT  A 
BPCADCAST  MFSSAGE,  BUT  IS  SPECIFICALLY  TO  A TERMINAL  USER.  PLEASE 
ACKNCWIEDGE  OR  LOGOUT  AT  ONCE,  IF  REQUESTED. 

1U.2E.57.PA,  OK  RFSPONSE  TO  USER  PA  AFTER  A MESSAGE  IS  RECEIVED 


i 
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TO  CFNTRflL  9ITF  OPFRflTOR 

M,  RF':T  op  MF9SAGF  UP  TO  flLPHANUMFPIC  CHA»ACTEPS- 

CC  NOT  USP  ANY  GPFCTAL  CHARACTPPS  FROM  PAGE  1-10  IN  THF  MESSAGF.  M 
WTLL  GFNO  TO  CENTRAL  SITE  FROM  COMMAND  OR  EDITOR  MODE  ONLY  IF  NC  OTHER 
MFSSAGP  IS  PENDING  AT  THE  CENTRAL  CONSOLE  FROM  ANY  USER.  NO  MESSAGES  TO 
OPEOATCR  AOP  STACKED.  USER  MUST  OFTYPF  WHEN  CONSOLE  IS  NOT  BUSY.  ALL 
PEPEIVEr  MFccflf,Fc5  pfcoMF  PART  OF  THE  SYSTEM  OAYEILE. 

THF  CPNTRAL  SITE  OPERATOR  SHOULD  NOT  BE  DOIHERED  UNLESS  A SYSTEM 
ppnpLCM  ARISES.  FOR  HELP  WITH  USE  DF  INTERCOM,  EITHER  TELEPHONE  USER 
SERVICES  OP  TYPE  SEND, USFPSFRVIC . (SEE  BELOW) 


TO  ANOTHER  TERMINAL 

SEND  COMMANDS  may  BE  DIRECTED  ONLY  TO  LOGGED  IN  INTERCOM  TERMINALS 
(U'^P  SITUATE  TO  VERIFY)  WHO  HAVE  NOT  TYPED  LOCK, ON  (USERS  WHO  HAVE 
TYPPC  LOCK, ON  HAVE  AN  * PRECEDING  THEIR  NAMES  IN  THE  SITUATE  LIST). 

THF  ENTIRE  M-  TO  10-CHARACTER  USER  NAME  MUST  BE  TYPED  IN  ANSWER  TO  WHOM 
(MCT  THE  R-CHAPACTFR  USER  ID  ALONE).  IF  TWO  OR  MOPE  USERS  WITH  THE 
SAMP  USER  NAME  ARE  CURRENTLY  LOGGED  IN,  PRECEDE  THE  USER  NAME  WITH  THE 
?-CHARACTER  user  id  (F.G.,  SEND, PA-USERSERVIO . A CONVERSATION  MAY  BE 
CAOPIPC  ON  DURING  THE  SEND  COMMAND  AND  MESSAGES  WILL  BE  STACKED  IN  THE 
BUFFER  OP  the  RECEIVER  UNLESS  LOCKED.  ALL  MESSAGES  ARE  TIME  STAMPED 
(LEVEL  R^O).  IT  IS  NOT  NECESSARY  TO  TYPE  END  TO  RECEIVE  A REPLY  ^0 
FipcT  FAPT  OE  A MESSAGE.  TO  TERMINATE  THF  SEND,  END  MUST  NOT  BE 
POLLCWFD  PY  ANY  OTMPR  CHARACTERS,  INCLUDING  PERIOD.  AVOID  SEND  TO 
UNLPSS  A SYSTPM  ppopLFM  IS  INVOLVED. 

EYAmplEJ  send,usepservic 

please  CALL  555-1234  TO  HELP  USEP 
EDITOO  PPOBLEMS  WITH  PERM  FILE 
PND 

SEND,  AS  DESCRTPED  ABOVE,  WILL  PROmpt  EACH  USER  ENTRY  WITH 
TYPE  MESSAGE  OR  END-.  TO  SUPRPESS  THIS  PROMPTING,  U$p 
SENC,XXXXYYYYYY,S  , WHICH  WILL  GIVE  AN  INITIAL  PROMPT  OP  GO-  AND 
ACPPPT  and  SPND  user  mfsSAGFS  UNTIL  END  IS  TYPED. 


TO  A USPR  who  tS  not  LDGOED  IN 

H«'SSAGFS  HAY  BP  SPNT  TO  INTERCOM  USp»S  WHO  ARE  NOT  LOGGED  IN  BY 
ir^TNC  BEGIN, SEND.  IN  ORDPR  TO  pECETVF  “pSSAGPS,  A USPR  “UST  FIRST  HAVE 
rTLP  NAMPn  'SPNOPIL*.  THE  SEND  PROCEDURE  HAS  4 FUNCTIONS) 


DFGTN,ppnD,, CREATE 
RPG  fN.SFNO, , ANY 
BE GIN, SEND, .LIST, OUTPUT 
BEGIN, SEND, ,SFNO, TO 

BEGIN, SEND, .explain 


CREATP  DrpHAN'"NT  P 1 L'^  'SENDPIL' 

CHECK  TO  see  ip  THPRE  A»E  ANY  Mi^SSAGES 

LIST  MESSAGPS  ON  PILE  'OUTPUT' 

SPND  MFSSAGFS  TO  USPR  'TO'  (4-CHARACTER 
USER-TD).  HAY  BE  ABBREVIATED  ' BEST N, SEND  ' . 

TYPE  EXPLANATION  OE  SEND  PPOCEOURF 
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♦*»  SAVING  FILFS  *** 

WHFN  A USFR  nFSIR«^S  TO  KFFP  A PROGRAM  OR  OATA  FILF  FOR  JSF  AT 
ANFTFFR  SESSION,  TT  MUST  BF  OATALOGRD  INTO  THF  PERMANENT  FILF  SYSTFM. 

^AVF,LFN  THIS  WILL  BF  ON  A PF  OFVICF  (EDITOR! 

CATALOG,LFN,PFN, in=XXXX , AC=JJ JJ JJJJJJ, <PARAMETERS>. 

ENTER  FILF  IN  CATALOG  (AC  OPTIONAL) 

sff  also  »stopf'  command  below. 


»»»  STORE,  FETCH,  DISCARD  COMMANDS  •** 

INTFPCOM  commands  store,  fetch,  and  DISCARD  HAVE  BEEN  MODIFIED  TO 
PF  rC«FATIBLF  WITH  DTNSROC  ACCOUNT  CONVENTIONS.  THE  CURRENT  PASSWORD 
JOP  CROFR  NUMBER  WILL  BF  THE  AC  TO  CATALOG  THF  FILE.  IF  THE  XXXX 
4-CHARACTFP  10  FOR  THF  FILE  IS  OMITTEO,  IT  IS  TAKEN  FROM  THE  LOGIN 
USER  in. 

STORE ,LFN 

STORE, LFN, XXXX  IS  THF  EQUIVALENT  OF t 

catalog, LFN, in=XXXX, A C=JJJJJJJJJJ,CY= 999. 
where  JJJJJJJJJJ  IS  THE  JOB  ORDER  NUMBER  FROM 
•LOGIN,XXYX, JJJJJJJJJJ'. 

THF  STORF  command  WILL  PUT  THE  FILE  ON  A *PF  DEVICE 
IF  IT  IS  NOT  initially.  AS  WITH  A CATALOG,  A 2-LINE 
MESSAGE  WILL  RF  TYPED  IF  THF  CATALOG  IS  SUCCESSFUL. 
THR  store  COMMAND  HAS  NO  PROVISION  FOR  PASSWORDS. 

FF  TCH,L  FN 

FT  TOP, LFN , XXXX  IS  THF  EQUIVALENT  OF J 

ATTACH, LFN, ID-XXXX. 

NO  MESSAGE  WILL  BF  TYPED  IF  THE  ATTACH  IS  SUCCESSFUL. 

OT’^CARD.LFN 

niSCARn,LFN, XXXX  IS  THF  EQUIVALENT  OF t 

ATTACH, LFN, ID=XXXX. 

PURGE, LFN. 

RETURN, LFN. 

IF  LFN  WAS  SUCCFSSFULLY  PURGED,  A 2-LINE  MESSAGE 
WILL  BE  TYPED. 
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nflY,OFF 

nflY,rN 

FPL ,XXXYX 
PPL  t 0 
PPL 


PTL  ,XXX 
FTL  ,0 
PTL 


SCPFFN*  XXX 
SCPPFN, XXX 
^FPFEN 


***  AOniTIONfiL  INTFPCOM  COMMANDS  *** 

SUPPRESS  PRINTING  OF  OAYFILF  MESSAGES  AT  THE  TERMINAL. 

PRINT  nAYFILP  messages  AT  THE  TERMINAL.  tOEFAULT) 

CHANGE  EXECUTION  FTELO  LENGTH  TO  XXXXX  (NORMALLY  UP  TO 
ftllOO).  THE  SECOND  AND  THIRD  FORMS  ARE  USED  TO  RESTORE 
THE  DEFAULT  FIELD  LENGTH  (4S000). 


CHANGE  THE  COMMAND  TIME  LIMIT  TO  XXX  OCTAL  SECONDS 
(NORMALLY  UP  TO  500  (3?0  DECIMAL)).  THE  SFCONO  AND  THIRD 

FORMS  ARE  USED  TO  RESTORE  THE  DEFAULT  COMMAND  TIME  LIMIT 
OF  ISO  (90  DECIMAL)  SECONDS.  A SHORT  TIME  LIMIT  IS  USEFUL 
IN  DEDUGGING  A LOOPING  PROGRAM  (MINIMIZES  CHARGES).  WHEN 
THE  time  limit  has  DEEN  REACHED,  THE  MESSAGE  'CP  TIME 
LIMIT*  WILL  PE  TYPED. 


WHEN  A PROGRAM  PRINTS  OUTPUT  ON  AN  INTERCOM  TERMINAL,  THE 
SYSTEM  GENERATES  A • GO  TO  NEXT  LINE*  AFTER  EACH  73 
characters  even  if  the  output  IS  LONGER.  ON  WIDE  CARRIAGE 
TERMINALS,  IT  TS  POSSIBLF  TO  PRINT  UP  TO  132  CHARACTERS 
PER  LINE  BY  TYPING  * SCREEN , 1 32  ' . THE  NUMBER  OF  CHARACTERS 
PER  LINE  IS  SWITCHED  TO  132.  ANY  NUMBER  LESS  THAT  132 
MAY  BE  USED,  SUCH  AS  * SCR EEN , 1 2 0 ' . TO  RESET  FROM  LONG 
LINES  RACK  TO  DEFAULT,  TYPE  'SCREEN*.  A USER  AT  A 
72-CHARACTER/LINE  TERMINAL  DEVICE  SHOULD  NOT  USE  THE 
COMMAND  SINCE  ALL  CHARACTERS  AFTER  72  WOULD  OVERPRINT 
THE  LAST  CHARACTER  AT  THE  END  OF  THE  LINE.  'YY* 

SPECTEIFS  THE  NUMBER  OF  VERTICAL  LINES  ON  A DISPLAY 
TERMINAL.  IT  IS  IGNORED  FOR  TELETYPES  AND  SIMILAR 
TERMINALS.  (SEE  GERM,  10-l«t  ITEM  H , FOR  AN  EXAMPLE  OF 
SCREEN, XXX, YY.  ) 


JUNP  \^77 


PAGF  9-16 


*•*  VFQ  CO*^MaND  ••• 

THF  TNTPPnOM  ‘yrT  COMMANH  may  BF  used  to  execute  PP0GP6MC.  IT  IS 
P'  'UTPfP  TO  MflKF  USr  OF  CEPTflIN  LOflDFP  COMMnNDSJ  EXECUTE,  LDSET, 
LTPLCa^,  Loac,  NOGO,  SLOan,  satisfy.  (see  CCRM,  2-15,16) 

TO  INITIATE  oPOGRAM  LOAniNG,  FNTFPJ 


f THF  PESPONnS: 

I 

if:  OPTION^ 

i 

£ FNTEP  ONE  OF  THF  OPTIONS  (LPAOEP  CONNANOS).  IF  EXECUTE,  NOGO  OR  A 

'j  FTlFKAMr  TS  NOT  ENTFPFO,  THF  SYSTEM  CONTINUFS  TO  REQUEST  OPTION  = 

i‘  fntpIFS.  TO  leave  the  XFO  COMMANO,  respond  to  the  0PTI0N=  REQUEST 

4;  KITH  'END'  . 


TF  the  load  sequence  ends  with  execute,  NOGO  OP  A FILENAME,  THE 
SMCPT  FOPMI 


XFQ,OPTION1,OPTION2,...,OPTIONN 
MAY  PF  uS'^n. 


KHFN  executing  a PROGRAM  BY  FILENAME  (E.G.,  'LGO*),  EITHER 

•lgc'  op  •xpq,lgo*  or  'xfq,load=lgo*  may  be  used. 

CPTIONS=  entries  are  ENTEPED  AS  FOLLOWS) 

FXFCUFF=ENAMF,oapAM1,PAPAM2, .. . ,PARAMN 

executf=,parami,papam2,...,paramn 


NOGO=NAMF 

NOGO 


NA ME, PAR AMI, PAP  AM?,..., PARA MN 

LCAD=LFN1 ,LFN2, . , . , LFNN 

LDSFT ,OPTION1 ,0PTT0N? , . . . ,0PTI0NN 
LDSET=OPTTON1,OPTTON2, ... ,OPTIONN 

fILES=LFN1/LFN2/.../LFNN 

FOP  ADDITIONAL  INFORMATION  ON  THE  VARIOUS  OPTIONS,  SEE  CCRM, 
^-is,if:  intepcom,  ii-i-i»(  thru  4?. 


1. 


2. 


3. 


(». 


5. 
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XEQ  EXAMPLES 

PROGRAM  USPS  SUBROUTINES  ON  LIBRARY  ‘NSROC* 

ATTACH, NSRDC. 

FTN,I=PROG,T,L=OUT. 

XEO,LOSET,LIB=NSROC,LGO 

MAIN  PROGRAM  USES  ALL  SUBROUTINES  ON  FILES  'SUBS'  AND  'MORSUBS'. 

MAIN  PROGRAM  IS  TN  EOITOR  WORKING  STORAGE. 

RUN,ETN,N 

X EQ, LO AO=L GO, SUBS, MOR SUPS, EXECUTE 

USER  WANTS  TO  PRESET  CORE  TO  NEGATIVE  INFINITE  WITH  EACH  WORD 
CONTAINING  ITS  OWN  ADDRESS.  A FULL  MAP  WITH  CROSS  REFERENCE  IS 
DESIRED  FOR  OFFLINE  PRINTING.  PROGRAM  IS  IN  FILE  'LGO'. 
niSCONT, OUTPUT 

XEQ,LOSET=MAP=SBX,PRESETA=NGINE,LOAD=LGO 
0 ISPOSE, OUTPUT, PR=C. 

SAME  AS  3.  ONLY  OVERRIDE  FIRST  PROGRAM  CARD  FILE  NAME  WITH  FILE  NAME 
'TAFE14'. 

OISCONT, OUTPUT 

XEO,LnSFT,MAP  = SRX,PRESETA=NGINF,LOAD  = LGO,  E XFCUTE  = , T A PE 1 4 

CREATE  A CORE  IMAGE  MODULE  ('CIM')  FROM  THE  RELOCATABLE  MODULE(S) 

CN  FILE  'LGO' 

XEQ,LOAD=LGO,NOGO=CIM 

THE  CORE  IMAGE  MODULF  'CIM'  MAY  NOW  BE  USED  TO  TEST  THE  PROGRAM 
USING  SEVERAL  SETS  OF  TEST  DATA  BY  USING  A COMMAND  SUCH  AS  ONE  OF 
THE  FOLLOHINGt 
CIM. 

CIM,TFSTl. 

DIM, TEST?. 

WHERE  'TFSTl'  AND  'TEST?'  APE  FILES  CONTAINING  TEST  DATA  AND 
OVERRIDE  THE  FIRST  PROGRAM  CARD  FILE  NAME.  THIS  WILL  SAVE  LENGTHY 
LCADER  PROCESSING  SINCE  THE  LOADER  HILL  NOT  HAVE  TO  FIND  ALL  THE 
REOUIDFD  subprograms  FOP  EACH  LOAD.  IF  THE  PROGRAM  IS  FOUND  TO 
WCRK,  'CIM*  CAN  THEN  BE  CATALOGED  (PROVIDED  A R EQUES T , Cl M , • PF . 
PRECEDED  THE  XEO>. 
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LOCAL  riLPS  MAY  OF  FXAMINFO  USTNG  THF  PAGE  COMMAND  (SFF 
NT,  THF  FTLF  MAY  PE  POSITIONED  FOPWAPD  OP  BACKWARD;  TABS 

APE  FPOVIDED  FOR  SCANNING  LONG  LINES;  THE  PRESENCE  OF  ABSENCE  OF  A 
character  STRING  MAY  BE  TFSTEDI  SFLECTFD  LINES  MAY  BE  TRANSFERRED  TO  A 
file  for  later  pRINTINGT  page  may  BF  EXITED  AND  RE-ENTERED  WITHOUT  LOSS 
OF  parameter  INFORMATION  OR  THE  LINE  INDEX  FILE.  PAGE  IS  GENERALLY 
FASTER  THAN  FDITOR  FOR  LOOKING  AT  AN  OUTPUT  FILE. 

PAGE  ACCESSES  NOS/RF  FILES  WITH  7-TYPE  RECORDS.  EACH  UNIT  RECORD 
(LINE)  IS  UP  TO  ISO  CHARACTERS.  A LONGER  LINE  WILL  BF  SPLIT  INTO  LINES 
OF  150  characters  or  less.  A DISPLAY-PAGE  IS  10  LINES. 

THF  FOLLOWING  CONTROL  CARO  WILL  INITIALIZE  THE  PAGE  PROGRAMl 


PAGF,LFN1,LFN?. 


PAGE  WILL  RESPOND  WITHt 


WHERE  LFNl  IS  THE  FILE  TO  BE  PAGED 
IDEFAULTt  OUTPUT; 

LFN?  IS  THF  PRINT  FILE 
(DEFAULT;  PRINT) 


READY.  . 


AFTER  WHICH  ANY  NUMBER  OF  PAGE  COMMANDS  ARE  ENTERED  IN  ONE  LINE, 
separated  by  commas.  these  commands  are  EXECUTED  CONSECUTIVELY.  IF 
MOPE  THAN  ONE  DISPLAY  COMMAND  IS  GIVEN,  ONLY  THE  FINAL  DISPLAY-PAGE  IS 
TYPED. 


THF  last  line  OF  EACH  DISPLAY-PAGE  IS  LINE  NNNNN 
IS  THE  PAGE  LINE  NUMBER  OF  THF  FIRST  LINE  TYPED. 


WHERE  NNNNN 


IF  AN 
OISFLAY-P 
UNPRCCFSS 


ERROR 
AGE  IS 
ED  PORT 


IS  FOUND  IN  A COMMAND  (SEQUENCE 
TYPED,  FOLLOWED  BY  U/XXX...  , 
TON  OF  THE  COMMAND  (SEQUENCE). 


, THE 
WHERE 


CURRENT 
XXX...  IS  THE 


IF  THF  USER  ABORTS 
RFMAINS  IN  PAGE. 


(PERCENT  A)  A SEARCH  OR  PRINT  COMMANO,  CONTROL 


HFLF>  COMMAND 


FNT 


PAGE  INCLUDFS  SEVERAL 
FP  HELP  FOP  A DFSCRI 


LISTS  WHICH 
PTION  OF  THE 


EXPLAIN  THE  VARIOUS  COMMANDS. 
LISTS  available. 
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R 

F CR 

TNK’ 

S 

F 

NN 
♦ MN 

-NN' 


M ro 


GFNFRflL  CONTROL  COMMANDS 
RFP^^AT  THF  PREVIOUS  COMMAND  LINE 
0 EXIT  THF  PAGE  PROGRAM 


OTSPLAY  FORMAT  COMMANDS 

DISPLAY  LINE  BEGINNING  AT  CHARACTER  POSITION  NN 
(INITIALLY  SET  TO  Tl) 

DISPLAY  THF  FIRST  7^  CHARACTERS  OF  THE  LINE. 

(S  HOOF  IS  DEFAULT) 

TO  SEE  MORE  OF  THE  LINE,  ENTER  T7T.  TO  RESTORE  TO  THF 
FIRST  72  CHARACTERS,  ENTER  Tl. 

DISPLAY  EACH  N0N-BLAN<  LINE  IN  ITS  ENTIRETY,  USING  SEVERAL 
DISPLAY  lines  if  NECESSARY. 


LINE  LOCATION  AND  PAGE  SEARCHING  COMMANDS 
GO  TO  LINE  NN 

(DISPLAY  10  LINES  STARTING  AT  LINE  NN) 

GO  FORWARD  NN  LINE'' 

(DISPLAY  10  LINES  BEGINNING  NN  LINES  AFTER  START  OF  LAST 
OISPL  AY-PAGE ) 

GO  BACK  NN  LINES 

(DISPLAX  10  LINES  BEGINNING  NN  LINES  BEEORE  START  OF  LAST 

display-page ) 

GO  fdrwapd  one  display-page 

(DISPLAY  NEXT  10  LINES) 

GO  BACY  ONE  niSPLAV-PAGE 
(DISPLAY  PREVIOUS  10  LINES) 

r,0  forward  to  FND-OF-FILE 

♦ M r,n  FOPWAPO  TO  NFY)  HFAn''P  LINE 

(A  HP  A 'IF  P line  has  a *1»  in  COLUMN  ONE) 


-H 


GO  BACK  TO  LAST  HEADER  LTNF 
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STRING  SEARCHING  CONMANOS 

THFSF  COMMANDS  S^APCH  FORWARD  OP  BACKWARD  FOR  THE  PRESENCE  OP 
An«5FKCF  OF  A SPECIFIEO  CHARACTER  STRING.  THE  FIRST  LINE  SATISFYING  THE 
SFAFCH  CONDITION  IS  DISPLAYED  AS  THE  FIRST  LINE  OF  A PAGE  OF 
rNFCR«ATION.  IF  A SEARCH  CONDITION  IS  NOT  MET,  A MESSAGE  STATES  THAT 
THE  beginning  OR  END  OF  THE  FILE  HAS  REFN  REACHED. 

STRING  SEARCH  COMMANDS  HAVE  THE  FOLLOWING  FORMt 

DIRFCTION  TYPE  RANGE  CONDITION  STRING 


WHFPF 


DIRFfTTCN 

f OP  Omittfo 


SFARCH  fopharo 
SEARCH  RACKWARD 


TYPE 

CMI TIED 
H 

RANGE 

CMITTED 
( T) 

(T-J) 


SEARCH  EVERY  LINE 
SEARCH  HEADER  LINES 


STRING  IS  ANYWHERE  IN  THE  LINE 
STRING  MUST  START  IN  COLUMN  I 

STRING  MUST  START  SOMEWHERE  BETWEEN  COLUMNS  I AND  J, 
INCLUSIVE 


''  0 NC  T T I ON 

••  OR  * 


STRING  MUST  RE  IN  THE  LINE 
STRING  MUST  NOT  BE  IN  THE  LINE 


STRING 

PYXX  . . .D 


n TS  THE  DELIMITER  AND  IS  ANY  CHARACTER  NOT  IN  THE 
SEARCH  STRING  XXX... 


•yAvfLES  of  string  searching  COMMANOSt 


=/AnCD/ 


SFARCH  FORWARD  FOR  THE  FIRST  OCCURRENCE  OF  ABCD 
ANYWHERE  IN  A LINE  AND  LIST  10  LINES 


'1,  H-'/T  tn/ 


GO  TO  BEGINNING  OF  FILE,  THEN  SEARCH  FORWARD  FOR  THE 
FIRST  HEADER  LINE  WHICH  DOES  NOT  CONTAIN  FTN.  (0,  IS 
NOT  NEEDED  IF  ALREADY  AT  START  OF  FILE.) 


-( 1?)-*SFVERITY*  SEARCH  BACKWARD  FOR  THE  FIRST  LINE  WHICH  HAS  SEVERITY 
STARTING  IN  COLUMN  1?.  THIS  CAN  BE  USED  TO  LOCATE  FTN 
FRROR  DIAGNOSTICS  IN  A COMPILATION  LISTING.  TO  SEARCH 
forward,  REMOVE  THE  MINUS  (-*. 

-Hn-9)r»vER*  SEARCH  BACKWARD  FOR  FIRST  HEADER  LINE  WHICH  HAS  VER 
STARTING  SOMEWHERE  IN  COLUMNS  1-B,  INCLUSIVE. 
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***  TFXT  FnnOR 
(NFTFD) 

BN  ELFMFNTBRY  TFXT  EDITOR,  CALLED  'NETED',  IS  NOW  AVAILABLE  ON  THE 
DTNSRDC  COC  6000  COMPUTERS.  IT  HAS  SOME  FEATURES  NOT  AVAILABLE  IN  THE 
INTERCOM  EOITOR.  NETFD  USES  VERY  LITTLE  CORE  (CURRENTLY  13K>  AND  LESS 
CP  TIME  THAN  EDITOR. 

NETED  obtained  FROM  THE  LAHRENCE  BERKELEY  LABORATORY  (BKY)  AND  WAS 
WAS  ENHANCEO  BY  ONE  OF  OUR  CUSTOMERS  (THE  CONSTRUCTION  ENGINEERING 
RESEARCH  laboratory  (CEPL),  COMPUTER  SERVICES  BRANCH). 

A DOCUMENT  (22  PAGES+COVER)  DESCRIBING  NETED  MAY  BE  OBTAINED  BY t 

BEGIN.UTILITY,, PROGDOC , OTHE R , , NE TE D , OUT pu T . 


TO  CFNTOAL  SITF  -OR- 

HHFRE  ftA  IS  1700  OR  ?00L)T  REMOTF  ID 


ROUTF.r  ASSTMN ,nc  = PR, T ID  = C, F I0  = * . 
ROUTF,rASOTNN,nC=PR,T  rn=AA,Fin=*. 
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*****  LIBRARY  AND  OTHFR  ROUTINF'  ***** 

SYSTF«  QRJFCT  ROUTINES  NFEOFO  BY  COMPILED  PROGRAMS  ARE  AVAILABLE  IN 
SYSTEM  LIBPAPIFS  AND  APF  DISCUSSED  BELOW.  ADDITIONAL  OBJECT  ROUTINES 
HAVE  RPPN  ADDFD  IN  LIBRARIES  OF  SUBPROGRAMS  (10-?),  LIBRARIES  OF  MAIN 
PRCGRAMS  (10-19)  AND  SOME  MISCELLANEOUS  PROGRAMS  (10-?1).  SOME  OF 
THF'^E  ROUTINES  ARF  FROM  VIM  (THE  COC  F>  0 0 0 USER'S  GROUP),  FROM  OTHER 
OPGAM7A’-IONS  AND  SOME  HAVE  BEEN  WRITTEN  AT  DTNSROC.  THESE  ARE 
DISCUSSED  IN  THE  RFST  OE  THE  CHAPTER. 


***  NOS/BF  l.C  SYSTEM  LIBRARIES 

NOS/BE  l.P  HAS  SEVERAL  LIBRARIES.  NO  ATTACH  IS  USED  FOR  ANY  OE  THE 
system  files. 

THE  COMOILFRS  GENERATE,  AS  PART  OE  THEIR  OUTPUT  OBJECT  CODE, 

THE  REQUIRED  LOSET  eqr  THE  NORMAL  OBJECT  LIBRARY.  IF  A COBOL  PROGRAM 
CALLS  ETN  object  LIPRARY  ROUTINES  OP  AN  ETN  PROGRAM  CALLS  COBOL  OBJECT 
LIBRARY  ROUTINES,  THE  USER  MUST  SUPPLY  THE  ADDITIONAL  LDSET. 

LIBRARY  CONTENTS 

BASLTB  RELOCATABLE  ROUTINES  eqR  BASIC 

COBOL  COBOL  (*.6  OBJECT  ROUTINES 

EOPTPAN  ETN  4.6  OBJECT  ROUTINES  (ETN,  CHAPTERS  8,  9,  I/O? 

FTN/S,  I-R-2,  T-8-7,  1-8-9,  III-ll-l,  I/O?  DEBUG) 

TGS?74  ?74  TGS  2.0  OBJECT  LIBRARY 

NUCLEUS  STANDARD  COMPILERS  (E.G.,  COBOL,  ETN) 

SYSTEM  CONTROL  CARO  UTILITIES  (E.G.,  COPYCE, 
UPDATE,  AUDIT) 


INTERCOM  COMMANDS  (E.G.,  BATCH,  LOGIN,  XEQ) 

PUN2PT  RUN  FORTRAN  2.3  OBJECT  ROUTINES 

SIMLIB  relocatable  routines  for  SIMSCRIPT  1.5 

SRTLTP  RELOCATABLE  SORT/MERGE  ROUTINES  USED  BY  COBOL  AND 

ETN 

SYSIO  RECORD  MANAGER  ROUTINES,  INTERNAL  I/O  MACROS, 

CPC  ROUTINES,  FORM  OBJECT  ROUTINES  AND  SYMPL 
OBJECT  LIBRARY 


SYSOVL 


HIGHEP  LEVEL  OVERLAYS  OE  COMPILERS  IN  NUCLEUS 
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**»  irBPAPIES  OF  SUOPPOCPAMO  *** 

LIBPAPY  FTL*^S  rxiGT  F FACH  HAJOP  ^ACKAGF  OF  SUO  PROGP  A -IS . EACH 
HILL  PFQUIPF  ATTACH  ANO  L CSF T /L T A P Y CAROS  TO  INITIATE  AUTOMATIC 
SUP'='CUTINF  LOADING.  PROGRAMS  USING  oquMNES  FROM  ANY  OF  IHESF 
LIPRARIFS  MUST  HAVF  OrpN  COMPlLfO  USING  NOS/RF  i.Q  0»  SCOPE  3.4. 

TO  ACCFSS  ANY  OF  THFSF  PIJPLIC  LlO^ARirst 

ATT ACH,L T"NAM.  WHFPF  LIHNAm  TS  A LTORARY  OFSCRIBED  BELOW 

. pyppawr  USFP  OBJECT  PROGRAM 

LFSFY  (LTR  = LIPNAM)  or  L OS F T ( L IB  = L I BN A Ml  7 L T B N A M2 ) IF  SEVERAL 

LGO.  LOAD  USFP  PROGRAM  WHICH  CALLS  ROUTINES 

ON  THF  SPFCIFIFO  library 

SCIFMIFTC  LIPRARIFS  CURRFMTLY  INSLUDFt  ARLNALG,  EOSTAT,  EISPACK. 

FUNPACK,  IMSL,  MSL,  NSRDC,  SSP 

PLOTTING  LIBRARIES  CURRFNTLY  TNCLUOFi  CALCFN,  CALC170,  CALC3D,  CALC763, 

CALC036.  SCCALC,  SC4020,  SC40GO 


PPIMFR  °LOTS  ARF  INt  NSRDC,  SSP 

MO^T  OF  THF  LIPRARIFS  APF  NON-PROPR TF T A R Y AND  HAVE  BOTH  SOURCE  AND 
OBJFCT  r-OOF  AVATLABLF  TO  THF  USFR.  A FEW  ARF  PROPPTFTARY  AND  HAVF  ONLY 
THF  CRJFCT  GOOF  AVAILAPLE. 


S YSMISC 

FPCMANFNT  file  ‘SYShISC’  contains  THF  OBJECT  ROUTINES  FOR  FIN  3.0, 
CODCL  3.0,  SORT  3.0,  AND  SIMULA.  TO  USE  THESE  ROUTINFS,  THE  JOB  MUST 
ATTACH  THE  LIBRARY  PRIOR  TO  LOADING  THE  RELOCATABLE  PRCGRAMI 

• • • 

ATTACH,SYSMISC. 

• • • 

LnSFT,LIB=SYSMTSC/SYSIO. 

LGO.  *»  LOAD  OLD  RFLOCATABLE  PROGRA-l 


JDNF  iq/7 
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flPLNALG  ( NON-PPODoTE T AP Y| 

THE  AFPOSPAGF  PEGFAPCH  LABOPATOPIFG  (APL)  LINEAR  ALGEBRA  LIBRARY 
I'^  A CPLL'^rTinN  OF  74  SURPOUTINFO  FOP  SOLUTIONS  TO  LINEAR  SYSTEMS  AND 
OF TFRMTNA TtON  OF  FIGFNVALUFS  ANP  FTGENVFCTOPS  OF  PFAL  SYMMETRIC 
matrices.  SQMF  of  these  routines  APF  SPECIFICALLY  OPTIMIZEO  FOR  6C00. 
(SEE  CCLIB  ANO  THE  flPL  LINEAR  ALGEBRA  LIBRARY  HANDBOOK  (TR  74-0106)) 


EOSTAT  (PROPRIETARY) 

LTPRAPY  EOSTAT  rONTAINS  ROTH  THE  EDSTAT-P  AND  EOSTAT-V  ROUTINES  FOR 
STATISTICAL  ANALYSIS  OF  BEHAVIORAL  SCIENCE  DATA  WHICH  WERE  OBTAINED 
EPCM  DATA  SCIFNCES  ASSOCIATES. 


EISPACK  (NON-PROPRIETARY) 

THE  EIGENSYSTFM  PACKAGE  FROM  APGONNE  NATIONAL  LABORATORY  IS  A 
COLLECTION  OF  OVER  3S  SUBROUTINES  TO  SOLVE  EIGENVECTOR  ANO  EIGENVALUE 
DROPLEMS.  ROUTINES  IN  THIS  PACKAGE  ARE  OFTEN  SUPERIOR  IN  SPEED  ANO 
ACCURACY  TO  STMTLAR  ROUTINES  IN  OTHER  PACKAGES.  (SEE  CCLIB) 

MACHTNE-READARLE  OOCUMEN T A T 10 N MAY  BE  LISTED  USING 
JOBNAmf,MT1.  name  / CODE 

CHARGE, .... 

RFGIN , DOC  tape, , EISPACK, <R0U TINE >, OUTPUT . 

(OUTP'JT  may  PE  POUTED  TO  PRINT  ON  NARROW  PAPER) 

REEEPENCEt  MATRTX  ETGENSYSTFM  ROUTINES  - EISPACK  GUIDE;  SMITH, 

BOYLE,  GAPBOW,  IKEOE,  KLEMA,  MOLER, 


EUNPACK  (NON-PROPRIETARY) 

SPFCIAL  functional  SUBROUTINE  PACKAGE  FROM  ARGONNE  NATIONAL 
LAPCPATOPY  CONTAINING  3?  ROUTINES  FOP  BESSEL  FUNCTIONS,  DAWSON'S 
TNTFGRAL,  fllTPTTC  TNTEGOALS  of  the  first  and  second  KIND  AND 
EXPCEENTIAL  INTFGPAL.  (SEE  CCLIB) 

vAChINE-READARLE  documentation  hay  RE  LISTED  USING 
JGRNAhe,MT1.  name  / CODE 

change, . . . . 

RFGTN, DOC  TAPE , , F UNP A CK , <ROU T INE > , OUT  PUT . 

(OUToiJT  MAY  BE  POUTED  TO  PRINT  ON  NARROW  PAPER) 


JUNF  1977 


PAGE  10-4 


IMSL  (PPOPPIETAPY) 

THE  INTERNATIONAL  MATHEMATICAL  AND  STATISTICAL  LIBRARIES  PACKAGE 
CONTAINS  over  SOO  SUBROUTINES  IN  THE  FOLLOWING  AREASI 

.analysis  of  experimental  design  data 

.RANDOM  NUMBERS,  GENERATION  AND  TESTING 
.STATISTICS,  BASIC,  NON-P ARA ME T IC,  SPECIAL  FUNCTIONS 
.REGRESSION  ANALYSIS 

.DIFFERENTIAL  EOUATIONS,  INTERPOLATION,  APPPOX IMA TION,SMOOTHI NG 
.LINEAR  ALGEBRAIC  EQUATIONS 
.VECTOR  MATRIX  ARITHMETIC 

EDITION  5 OF  TMSL  CONTAINS  ALL  PREVIOUS  UPDATES  AND  INCLUDES  OVER  50 
NEW  SUBROUTINES. 

MACHINE-READABLE  DOCUMENTATION  MAY  BE  LISTED  USING 
JOBNAME,MTl.  NAME  / CODE 

CHARGE,.... 

BEGIN,DOCTAPE,, IMSL, < ROUT  INF >, OUT PUT. 

tOUTPUT  MAY  BE  ROUTED  TO  PRINT  ON  NARROW  PAPER) 


MSL  (PROPRIETARY) 

THE  CnC  MATH  SCIENCE  LIBRARY  (BOEING  PACKAGE)  CONTAINS  OVER  200 
NUMERICAL  MATHEMATICAL  ROUTINES  COVERING  THE  FOLLOWING  EIGHT  AREAS) 
.programmed  ARITHMETIC 
•ELEMENTARY  FUNCTIONS 
.POLYNOMIALS  AND  SPECIAL  FUNCTIONS 
.ORDINARY  DIFFERENTIAL  EQUATIONS 
.INTERPOLATION,  APPROXIMATION  AND  QUADRATURE 
.LINEAR  ALGEBRA 

.PROBABILITY,  STATISTICS  AND  TIME  SERIES 
.NONLINEAR  EQUATION  SOLVERS 
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NSPnn 

•NSRnC*  15  ft  LIRRARY  OF  DTN5R0C  WRITTEN  AND/OR  SUPPORTED 
SUPPROHRAMS.  SURROUTINFS  FORMERLY  AVAILARLF  ONLY  ON  TAPE  CLIDRARYUPDJ 
ARE  INCLUDED.  MANY  SURPROGRAMS  HAVF  NEVER  BEEN  RAPT  OF  ANY  OTHER 
LIPRARY. 

•NSROC*  HAS  A WIDE  VARIETY  OF  ROUTINES  INCLUDING.  BUT  NOT 
LIHITED  TOI 

•ROOTS  OF  POLYNOMIALS  ( HELP ( COMPLE X ) , PROOT) 

•SPECIAL  FUNCTIONS  ( BE SS I / J/K /Y , CELLI/ELLI,  FRESNEL.  GAMMA, 
JACOBIAN  ELLIPTIC) 

•INTEGRATION  <KUTMER,  SIMPUN,  DISCOT,  GAUSS  QUADRATURE) 
•INTERPOLATION  AND  CURVE  FITTING  (FAST  FOURIER  TRANSFORM.  HARMONIC 
ANALYSIS,  LE AST-SQUAPES  AND  ORTHOGONAL  POLYNOMIALS) 

•EIGENSYSTEM  (VARAHl/?) 

•SIMULTANEOUS  LINEAR  EQUATIONS  (CGAUSS,  CMPINV,  MATINS) 

• CHARACTER  MANIPULATION  (ADJL/R,  ASHI F T /SHI  FT  A , CENTER,  COMPSTR, 
EXTPRM,  GETCHA/PUTCHA,  IFINDCH,  LASTC,  MOVSTR,  REPLAC,  CHFILL, 
TRAILBZ) 

•SORTING  (ASORT,  ASORTMV,  SSORT,  SSORTI/F/L) 

•DATE  MANIPULATION  (JGDATE,  JULIAN,  MONTH,  NEWDAT,  WEKDAY) 

•TIME  MANIPULATION  ( ALT IME/FL TI ME , IHMS/ISEC) 

•FILE  MANIPULATION  (CLUNLD/UNLO AO,  REQUEST,  ROUTE,  SKPFIL,  ZPFUNC 
(ATT ACH/CATALOG/FXTEND/PURGE/ETC. ) ) 

•DEBUGGING  AIDS  AND  DUMPING  (OUMPA,  PRTIME,  RECOVRD) 

•PLOTTING  (PLOTPR) 

•EXTRACTING  INFORMATION  ABOUT  JOB  (CPU467,  HERE,  lOID,  JOBNAME, 
JOBORG,  OVLNAME) 

DOCUMENTATION  FOR  MANY  OF  THE  ROUTINES  IN  ’NSRDC'  CAN  BE  FOUND  IN 
CCLIB/N. 
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S5P 

VERSION  ITT  OF  THE  IBM  SCIENTIFIC  SUBROUTINE  PACKAGE  CONTAINS 
only  single  precision  routines.  all  subroutine  names  are  PRECEDED 
THE  LETTER  I (E.G.,  MINV  IN  THE  SSP  MANUAL  IS  IMINV  IN  THE  LIBRARY. 
SINCE  MANY  OF  THESE  ROUTINES  WERE  OPTIMIZED  FOR  32-BIT  WORDS,  USE  W 
CAUTION  ON  COC.  THESE  ROUTINES  ARE  NO  LONGER  MAINTAINED  BY  IBM. 

PEEERENCEl  IBM  FORM  NUMBER  GH20-0205,  SYSTEM/360  SCIENTIFIC 

SUBROUTINE  PACKAGE,  VERSION  III,  PROGRAMMER'S  MANUAL 


BY 

) 

ITH 
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***  PLOTTING  LTBRAPTES  » • * 

PL'^TTIN''.  pOUTTN'^S  APP  AVAILABLE  ^OR  CALCOMP  PEN  PLOITPRS,  MIGROPILH 
dipttfrg  or  printer  plots. 

PPVPPAL  LTPPAPIPS  CONTAIN  THE  ROUTINES  POP  THP  VARIOUS  CALCOHP 
PLOTTPPS  AVAILABLE. 


***  PRINTER  PLOTS  *•» 

'^PP  CCLIB/NI  PLOTPR.  ANO  SSp  MANUAL,  PAGE  4G2  (PLOT  IN  THE  MANUAL 
ANT  IPLOT  IN  thp  LIBRAPY). 


OEF-LINE  PLOTTERS  *** 

SEVERAL  DTFPPRPNT  OFE-l  TNE  PLOTTERS  ARE  AVAILABLE  AT  DTNSRDC. 
SOPTWAPP  PACxraGPS  POP  EACH  ARE  PTSCUSSED  BELOW.  A DEVICE-INDEPENDENT 
PACKAGP,  WHICH  CAN  MSP  MANY  OIPEFRENT  PLOTTERS,  IS  DISCUSSED  ON  10-17. 


»*♦  CALCOMP  plotters  *** 

THE  BASIC  CALCOMP  PACKAGE  FOR  ON-LINE  CALCOMP  PLOTTERS  AND  OEE-LINE 
PLOTTERS  ON  THE  COC  SOOO  COMPUTERS  INCLUOES  THE  FOLLOWING  FORTRAN 
POUTINPSJ 

plot  (WITH  ENTRTESJ  PLOTS,  WHERE,  FACTOR,  OFFSET) 

CONVERT  ALL  PEN  MOVEMENT  SPECIFICATIONS  FROM  INCHES  TO 
ACTUAL  PLOTTER  COMMANOS 

SCALE  examine  A OATA  ARRAY  TO  DETERMINE  STARTING  AND  SCALE 
VALUES  ANO  CONVERT  FROM  INCHES  TO  ACTUAL  PLOTTER 
commands 

AXIS  DRAW  AN  AXIS  LINE  WITH  APPROPRIATE  SCALE  ANNOTATIONS 

ANO  TITLE 

LINE  "LOT  A S«^PIES  OF  SCALED  DATA  "OINTS  DEFINED  BY  TWO 

ARRAYS  (X  AND  Y) 

NUHPro  OPAW  THE  OFCIMAL  EOUIVALENT  OE  AN  INTERNAL  FLOATING- 
POINT NUMBER 

symbol  draw  ANY  SEQUENCE  OE  ALPHAMERIC  CHARACTERS 
THE  CALLING  SFOUFNCES  ARE  AS  DESCRTRFO  IN  ”"POGR AM  MI NG  CALCOMP  PEN 

plcttfdg”  manual. 

FOP  CALCOMP  BTB  AND  7BT,  THE  FIPST  CALL  MUST  BE 

call  plots  (IBUE,  NSI7F,  NT) 

TO  CFETNE  THP  OUTPUT  UNIT  -TAPENT".  THE  LAST  CALL  ^UST  RE 

caiL  Pl.oT  (X,  Y,  oqq) 

TO  CLOSE  THE  FILE. 

EA''H  OE  THE  LTBPARTES  BELOW  TS  AM  EOITLIB  LIBRARv  AN  : PE3JTPES* 

AT  T ACH,CALCXYX. 

nS^Til  IB  = CAi.CYvy.  OR  LTROARY.CALCXXX. 

WHEPf  vyy  niyr  pr  1/0,  7f,T,  q'^f>. 
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***  CALCOMP  q-?6  PEN  PLOTTER 
(CALCP3<S) 

THIS  lirpary  contains  routines  from  the  basic  package,  in  overlay 

JOPS,  SURROUTINE  PLOT  MUST  PE  IN  THE  MAIN  LINK*  (0,0)  OVERLAY. 

THE  CALLING  SEQUENCES  ARE  AS  DESCRIRED  IN  "PROGRAMMING  CALCOMP  PEN 
PLOTTERS"  MANUAL.  AN  AOOITIONAL  ROUTINE  NEHPEN  IS  AVAILABLE.  ROUTINE 
BUFF,  TNCLUOEO  IN  THIS  PACKAGE,  AUTOMATICALLY  ALLOCATES  BUFFER  SPACE. 
THEREFORE,  IT  IS  NOT  NECESSARY  TO  ESTABLISH  A BUFFER  AREA  AS  IS 
RFCUIRFO  FOR  THE  CALCOMP  763  PLOTTER.  THE  FILE  NAME  FOR  THE  PLOT 
OUTPUT  FILE  MAY  NOT  RE  OVERRIDOEN  ON  THE  LGO  CAPO  OF  THE  FTN  PROGRAM 
STATEMENT. 

THESE  routines  MAY  REQUIRE  UP  TO  3000  OCTAL  LOCATIONS. 

THF  OUTPUT  TAPF  IS  A 7-TRACK,  LABELLEO  T AC>E  AT  6(3  0 OR  556  BPI. 


1700  CALCOMP  PEN  PLOTTER  ♦*» 

(CALC170) 

THIS  LIRPARY  CONTAINS  THE  BASIC  CALCOMP  PACKAGE  FOR  THF  ON-LINE 
CALCCMP  PLOTTER  ON  THE  CDC  1700  AT  NAVSEC  AND  NAVAIR.  THE  GRAPH  OUTPUT 
TS  WRITTEN  TO  FILE  "PLOT",  WHICH  NEED  NOT  BE  ON  FTN  PPOGRAM  STATEMENT. 
THIS  ETLP  HAS  AUTOMATIC  DISPOSITION  AT  END-OF-JOB  (SEE  CCRM,  14-4).  TO 
ELIMINATE  THE  PLOT  FILE  DURING  CODE  CHECKING,  USE 
LGO. 

ROUTE, PLOT. 

THE  ROUTINE  PLOTS  IS  A DUMMY  ROUTINE  FOR  COMPATIBILITY  WITH  CALCOMP 
763  AND  CALCOMP  936.  ADDITIONAL  ROUTINES  AVAILABLE  AREt 

IDFPMKK  PRODUCE  BANNER  PAGE  FOR  CALCOMP  OUTPUT 
CTRCL  PRODUCE  GENERAL  GEOMETRIC  DESIGNS,  E.G.,  RECTANGLES, 
CIRCLPS,  ETC. 


**•  CALCOMP  763  pen  PLOTTER 
(CALC763) 

THIS  LIBRARY  CONTAINS  ROUTINES  FROM  THE  BASIC  CALCOMP  PACKAGE.  IN 
OVERLAY  JOBS,  subroutine  PLOT  MUST  RE  IN  THE  MAIN  LINK:  (0,0  OVERLAY). 

THF  CALLTNG  SFOUENCES  APE  AS  DESCRIBED  IN  "PROGRAMMING  CALCOMP  PEN 
PLOTTERS"  MANUAL.  THE  FILE  NAME  FOR  THE  PLOT  OUTPUT  FILE  MAY  NOT  RE 
OVEPPirOEN  ON  THE  LGO  CARD  OR  THE  FTN  PROGRAM  STATEMENT. 

These  routines  may  require  up  to  3000  octal  locations. 


THE  output  TAPF  IS  A ST  UNLAB'-LLED  TAPE  AT  556  BPI 
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***  CALCOMP  rUNCTIONAL  PACKAGE  t PRO P9 I E T A R Y > ♦*» 

(CALCEN) 

THP  CALCOMP  FUNCTIONAL  SOFTWARE  LIBRARY  CONSISTS  OF  SEVERAL 
CATEGORIES.  THESE  FORTRAN  ROUTINES  GENERATE  CALLS  TO  THE  BASIC 
SOETWAPE  requiring  the  user  to  also  attach  and  make  AVAILABLE  THE 
library  EOR  the  appropriate  PLOTTRP  <CALC170,  CALC763,  CALC936). 

BUSINR^S  applications 

AXTSB  - DRAWS  AN  AXIS  WITH  BUSINESS  ORIENTED  ANNOTATION 
AXTSC  - DRAWS  AN  AXIS  WITH  CALENDAR  MONTH  ANNOTATION 
BAR  - DRAWS  BARS  EOR  BAR  GRAPH  PLOTTING 

LBAXS  - DRAWS  A LOGARITHMIC  AXIS  WITH  BUSINESS  ANNOTATION 
LGLIN  - PLOTS  DATA  EITHER  IN  LOG-LOG  OR  IN  SEMI-LOG  MODE 
SCALG  - PEREOPMS  SCALING  EOR  LOGARITHMIC  PLOTTING 
SHADE  - DRAWS  SHAOING  BETWEEN  DESIGNATED  LINES 

DRAFTING  APPLICATIONS 

ARCHO  - DRAWS  ARROWHEADS 

ARROW  - DRAWS  LINES  TERMINATED  WITH  AN  ARROW 

CNTRL  - DRAWS  CENTER  LINES 

CIMEN  - DRAWS  ANNOTATED  DIMENSION  LINES 

LAPBL  - DRAWS  ANNOTATION  BETWEEN  SPECIFIED  POINTS 

GENERAL  APPLICATIONS 

CIRCLE  - DRAWS  CIRCLE,  ARC  OR  SPIRAL 

CA^HL  - DRAWS  DASHED  LINES  CONNECTING  A SERIES  OF  DATA  POINTS 

CASHP  - DRAWS  DASHED  LINES  TO  A SPECIEIED  POINT 

FLIPS  - DRAWS  AN  ELLIPSE  OR  ELLIPTICAL  ARC 

FIT  - DRAWS  A CURVE  THROUGH  THREE  POINTS 

GRID  - DPAWC  LINEAR  GRID 

POLY  - DRAWS  AN  EQUILATERAL  POLYGON 

RECT  - DRAWS  A RECTANGLE 

SCIENTIFIC  APPLICATIONS 

CUPVX  - PLOTS  A FUNCTION  OF  X OVER  A GIVEN  RANGE 

CURVY  - PLOTS  A FUNCTION  OF  Y OVER  A GIVEN  RANGE 

FLTNE  - DRAWS  A SMOOTH  CURVE  THROUGH  A SET  OF  DATA  POINTS 

LGAXS  - DRAWS  A LOGARITHMIC  AXIS  WITH  ANNOTATION 

POLAR  - PLOTS  DATA  POINTS,  USING  POLAR  COORDINATES 

SCALG  - PERFORMS  SCALING  FOR  LOGARITHMIC  PLOTTING 

SMOOT  - DRAWS  A SMOOTH  CUPVE  THROUGH  SEQUENTIAL  DATA  POIN^^ 

MISCELLANEOUS 

CRVPT  - FITS  A POLYNOMIAL  CURVE  TO  A SET  OF  DATA  POINT  . 

FITTED  CURVE,  ORIGINAL  DATA  WITH  RFCBPENCE  A*r.  *• 
EQUATIONS  OF  CURVE 


M)-A0«3  559  DAVID  W TAYLOR  NAVAL  SHIP  RESEARCH  AND  DEVELOPMENT  CE— ETC  P/«  9/2 
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examples 


1.  CALCOMP  916  PLOTTED 


y XXX ,MT1 . 
rHAPHEt.... 

ATT  ArH,r.ALCqi6. 
FTN,OPT=l. 

LABEL, TAPE 10 »L=CALG, D=HI 
LESET (LTB=rALC936) 

LGO. 

* 7/fl/q  EOP 

PROGRAM  PLOTPGM  ( 
CALL  PLOTS  (IRUF, 


NAME  / CORE 


BASIC  CALCOMP  93b  PACKAGE 
COMPILE  USER  PROGRAM 

WIRING, VSN=CAq9qg.  NOS/BE  LABLO  TP  556  BPI 
SELECT  USER  LIBRARY 
LOAD  EXECUTE  USER  PROGRAM 


• • 

0,  10) 


CALL  PLOT  (0.,  0.,  999) 
END 

• 7/«/q  EOR 

(DATA) 

••  6/7/R/9  EOP 

?.  CALCOMP  1700  PLOTTER 


XXXX. 

CHARGE,  .. . . 

ATTACH, CALC170. 
ETN,CPT=1. 

LCSPT  f LIB=CALC170) 

LEO. 

RCUTE ( PLOT,nC=PT,TIO=AE) 
» 7/3/9  EOP 

(SOURCE  PROGRAM) 

' 7/3/9  EOP 

(DATA) 

••  6/7/3/Q  EOE 


NAME  / CODE 

CALCOMP  1700  PLOT  PACKAGE 
COMPILE  USER  PROGRAM 
SELECT  USER  LIBRARY 
LOAD  ♦ EXECUTE  USER  PROGRAM 
PLOT  DATA  ON  1700  AT  NAVSEC 


1 


CALCOMP  767  plotter  (ALSO  USE  ROUTINES  IN  FUNCTIONAL  PACKAGE) 


XXXX,MT1.  NAME  / 

charge,.... 

etn,opt=i. 

ATTACH, CALC763. 
attach.calcen. 

RECL'EST,TAPE16,HT  ,RING,VSN=CA9999. 
lose  T (LIB  = CALC76  7/CALCEN) 

LGO. 

' 7/3/9  EOP 


CODE 

COMPILE  USER  PROGRAM 
BASIC  CALCOMP  763  PACKAGE 
CALCOMP  FUNCTIONAL  PACKAGE 
NOS/BE  UNLARELLFD  TAPE  556 
SELECT  USER  L IBRARIES 
LOAD  ♦ EXECUTE  USER  PROGRAM 


PROGRAM  PLOTPGM  (... 
OT“PNSTON  IBUE(IOOO) 

CALL  PLOTS  (IBUE,  ICOO,  16) 


• • • 

CALL  PLOT  (0.,  0.,  999) 
END 

7/3/9  EOP 

(OATA) 

6/7/3/q 


EOE 
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***  SCU020  TO  CALCOMP  ♦** 

(SCCALC) 

SCCALC  TS  A PLOT  LIBRARY  WHICH  ALLOWS  A PROGRAM  WRITTEN  WITH  SC‘.020 
CAMS  TO  PLOT  ON  THP  CALCOMP  936  OR  763.  INSTEAD  OF  LIBRARY  SC4020, 
THREE  LIBRARIES  ARE  USFOt  SCCALCf  CALCFN  AND  CALC936  (OP  CALC763) . SEE 
THE  FYAMPLE  below. 

SEVFPAL  SC40?0  ROUTINES  NOT  NORMALLY  REFERENCED  BY  USERS  ARE  DUMMY 
ROUTINES.  NO  ID  FRAME  WILL  BE  DRAWN.  THE  OPTION  FOR  USER-WRITTEN 
XMOOV  AND  YMOOV  FOR  NON-LINEAR  CONVERSION  IS  NOT  AVAILABLE!  HOWEVER, 

LOG  PLOTS  MAY  BE  DRAWN. 

SCCALC  INCLUDES  ENTRY  POINT  NAMES  BPLOTV,  CHARDC,  DLCl  AND  COMMON 
BLOCK  OLCPLT.  THESE  NAMES,  AS  WELL  AS  THE  SASIC  ROUTINE  NAMES  LISTED 
ON  CCRM,  10-9,  MAY  NOT  RE  USER  ROUTINE  NAMES. 

THE  OUTPUT  IS  ON  MAGNETIC  TAPE  TAPE48,  WHICH  MAY  NOT  BE  OVERRIDDEN 
ON  THE  LGO. 


EXAMPLE 


XXXX,MT1,....  NAME  / CODE 

CHARGE,.. .. 

FTN,OPT=l. 

LAb'eL,TAPE4  8,L=XXXXCALC,D=HI,W,RING,  VSN  = CA9999. 

ATTACH, CALCFN. 

ATTACH, CALC936.  ••  OR  ATT ACH, CALC763 . 

ATTACH, SCCALC. 

L0SET,LI9=SCCALC/CALC936/CALCFN.  . .. /C ALC763/. . . 

LGO. 

* 7/8/P  FOR 

PROGRAM  MYPPOG  (INPUT=128,  0UTPUT=128,  TAPE48,  ...) 

(RFST  OF  FTN  SOURCE  PROGRAM  WITH  SC4020  CALLS) 


7/8/9 

FOR 

DATA,  IF 

ANY) 

6/7/8Z9 

EOF 
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•••  CALCOMP  THPEF-D  SOFTWARE  *♦*  (PROPRIETARY! 
(CALCSn) 

THE  THRFE-0  PROGRAM  AUTOMATICALLY  DRAMS  THREE  DIMENSIONAL 
representations  OF  DATA  THAT  CAN  BE  EXPRESSED  AS  A FUNCTION  OF  TWO 
VARIABLES. 

SURFACES  CAN  BE  DRAWN  TRANSPARENT,  WITH  ALL  LINES  SHOWN,  OR  AS 
OPACUF,  WITH  HIDDEN  LINES  REMOVED.  THE  SURFACE  FUNCTION  CAN  BE 
SPECIFIED  AS  AN  EXTERNAL  FUNCTION  TO  BE  EVALUATED  OVER  A GIVEN  X AND  Y 
RANGE,  OR  AS  7 VALUES  AT  THE  MESH  POINTS  OF  A RECTANGULAR  ARRAY. 

THREE-D  CAN  AUTOMATICALLY  GRID  IRREGULARLY  SPACED  INPUT  DATA. 

THE  USER  MAY  INSERT  ADDITIONAL  DATA  INTO  THE  ORIGINAL  DATA  ARRAY  TO 
PROVIDE  A SMOOTHER  PLOT  OF  ROUGH  ARRAY  DATA,  THE  PACKAGE  PROVIDES 
FOR  AUTOMATIC  ORIENTATION  OF  ANNOTATION  TO  FIT  VIEWING  DISTANCE  AND 
ANGLE.  THE  DRIVER  PROGRAM  IS  CONTROLLED  BY  USER  SPECIFIED  PARAMETERS 
ON  INPUT  CARDS.  ALSO  STEREOSCOPIC  PAIRS  CAN  BE  PRODUCED  IN  ACCORDANCE 
WITH  USERS  MANUAL. 

THE  THREE-D  PROGRAM  MAY  BE  EXECUTED  BY  USING  THE  CATALOGUED 
PROCEDURE  CALC30.  (SEE  CCLIB/P) 

AT  DTNSROC,  IF  FIELD  INLU  ON  THE  B CARD  IS  SPECIFIED,  IT  MUST  BF  3 
(DATA  ON  TAPE3). 

REFERENCE!  THREE-D  - A PERSPECTIVE  DRAWING  SOFTWARE  SYSTEM,  CALCOMP, 
1969. 
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*♦*  SC-4020  MICROFILM  PLOTTER  ROUTINES 

<SC40?0) 

THE  STROMOERG-CftRLSON  4020  MICROFILM  PLOTTER  ROUTINES  <SCORS)  ARE 
IN  LI9RARY  SC4020.  THE  FORTRAN  PROGRAM  CARO  MUST  CONTAIN  THE  FILE 
TAPF48.  THP  OUTPUT  IS  EITHER  THE  USER'S  OWN  STRANGER  TAPE  fll  556  BPI 
OR  CN  THE  SPECIAL  EILMPL  FILE  FOR  BATCH  OUTPUT.  THE  SCORS  REFERENCE 
MANUAI.  IS  AVAILABLE  IN  CODE  1R92. 

THF  FIRST  PLOTTING  CALL  SHOULD  BE  TO  CAMRAV  AND  IDFRMV  TO  PLOT  ID 
FRAME.  THE  LAST  CALL  SHOULD  BE  CALL  PLOTNO  (0). 


SC-4020  - USER  INFORMATION  *** 

1.  MOST  SUBROUTINE  CALLS  FROM  SCORS  PACKAGE  FOR  SC  4020  MAY  BE 
USED  DIRECTLY  ON  THE  CDC  6000.  THE  PROGRAMMERS  REFERENCE  MANUAL 
FOR  THE  SC  4020  COMPUTER  RECORDER  BY  STROMBERG-CARLSON  CORPORATION 
IS  STILL  valid  DOCUMENTATION,  EXCEPT  FOR  THE  FOLLOWING  CURRENTLY 
KNOWN  CORRECTIONS  AND  ADDITIONS. 

A.  THE  USER  MAY  SUPPLY  A TAPE  FOR  EACH  JOB.  THIS  TAPE  WILL  BE 

PROCESSED  ON  THE  CMLD  SC  4060  WHEN  THE  REQUEST  FORM  IS  SUBMITTED 
TO  AOP  CONTROL  AFTER  THE  CDC  6000  RUN. 

E.  BATCHED  OUTPUT  FOR  THE  4020  PACKAGE  MAY  RE  WRITTEN  TO  FILE 

FILMPL  BY  INCLUDING  FILMPL, TAPE48=FILMPL  ON  THE  PROGRAM  CARD 
OR  OVERRIDING  THE  PROPER  FILE  POSITION  ON  THE  LGO.  STANDARD 
REQUESTS  FOR  PROCESSING  THIS  OUTPUT  MUST  BE  SUBMITTED  TO  AOP 
CONTROL  CENTER  WITH  THF  SEVEN-CHARACTER  JOB  NAME  INSTEAD  OF  A 
TAPE  NUMBER. 

2.  TO  PROPERLY  GENERATE  AN  ID  FRAME  BOTH 

CALL  CAMRAV  CN) 

CALL  IDFRMV  (NAME, CODE, PHONE ) 

MUST  APPEAR  IN  EITHER  ORDER  AS  THF  FIRST  CHARACTRON  ROUTINES  CALLED. 

NAME  - UP  TO  10  ALPHAMERIC  CHARACTERS 

CODE  - UP  TO  10  ALPHAMERIC  CHARACTERS 

PHONE  - UP  TO  10  ALPHAMERIC  CHARACTERS 

THESE  ARGUMENTS  ARE  NORMALLY  DEFINED  AS  HOLLERITH  DATA. 

3.  'call  PLTND(0»  will  empty  THF  OUTPUT  BUFFER,  AND  PLACE  AN  FND-OF- 
FILF  MARK  ON  THF  SC  4020  OUTPUT  FILF.  IT  SHOULD  BE  THE  LAST  CHARACTRON 
ROUTINE  CALLED  IN  EVERY  JOB.  THE  FRAME  COUNT  IS  ENTERED  IN  THE  DAYFILE 
AND  CN  OUTPUT  FILE.  (CALL  PLTND(l)  DOES  NOT  ISSUE  FRAME  COUNT  OR 
WRITE  END  FILE.) 


4.  THF  FCLLOWING  ROUTINES  ARE  NOT  AVAILABLEl 
SCOUTV 
VCPS 

TA9L4V,  TARL6V 
TABLSV,  TABOSV 
TABL7V,  TAR07V 
TABL8V,  TARL9V 
TABllV,  TARISV 
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5.  SINCE  HOST  COC  EOOO  SC  ««020  ROUTINES  ARE  FORTRAN  CODED  THERE  IS 
ONLY  ONE  LENGTH  FOR  EACH  CALLING  SEOUENCEt 

A)  FRAMEV  MUST  HAVE  1 ARGUMENT,  USE  CALL  FRAMEV(O). 

B»  XAXISV  AND  YAXISV  MUST  HAVE  3 ARGUMENTS.  IF  THE  AXIS  IS  TO 
GO  TO  END  OF  FRAME,  USE  0 OR  1023  FOR  3RD  ARGUMENT. 

C)  POINTV  HAS  ONLY  THE  3 ARGUMENT  FORM  USING  FLOATING-POINT  DATA 
VALUES,  THE  EQUIVALENT  OF  THE  A ARGUMENT  RASTER  FORM  IS 
CALL  R0INTV(IX1,IY1,NC) . 

C)  NOFRV  HAS  ONLY  1 ARGUMENT  TO  RETURN  THE  TOTAL  FRAME  COUNT, 

E)  KMKPLT  may  be  CALLED  ONLY  WITH  THE  3 ARGUMENT  FORM.  NO  TITLES 
ARE  DTSPLAYFO, 

F)  VCHARV  MUST  HAVE  6 ARGUMENTS.  THE  ALTERNATE  SINGLE  PATTERN 
SPECIAL  OCTAL  DATA  FORM  OF  VCHARV  WITH  7 ARGUMENTS  IS  NOT 
AVAILABLE. 

G»  PRINTV  MUST  BE  CALLED  WITH  A ARGUMENTS  - 
CALL  PRINTV  (N, BCDTXT, IX, lY ) 

HJ  RESETV,  BRITEV,  FAINTV,  RESCLV  HAVE  NO  ARGUMENTS. 

6.  IF  OVERLAY  IS  USED,  FLAGSV  AND  PLOTDD  (WHICH  ARE  INTERNALLY  USED 
BY  THE  CALLS  IN  THE  USER  PROGRAM)  MUST  NOT  BE  OVERLAID.  TO  FORCE 
LOADING  OF  TH^SE  INTO  THE  0,0  OVERLAY,  USE  THE  FOLLOWING  CONTROL  CARDSI 

LOSFT,LTB=SCA020,USE=FLAGSV/PLOTOO. 

LCO. 

7.  CALL  INTBCD  (I,N)  IS  A NEW  ROUTINE  WHICH  CONVERTS  AN  INTEGER  I 
(LESS  than  10000)  INTO  ITS  BCD  EQUIVALENT  IN  N,  RIGHT  JUSTIFIED  AND 
SPACE  filled. 

R.  ALL  alphameric  TITLES  MUST  RE  SINGLE  PRECISION  ARRAYS  (10 
CHAPACTERS  PER  WORD  IN  DISPLAY  CODE)  WHICH  WILL  BE  INTERNALLY  CONVERTED 
TO  SC  <*020  BCD.  ALL  VECTORS  OF  COEFFICIENTS  FOP  PLOTTING  MUST  BE 
SINGLE  PRECISION  REAL  NUMBERS. 

B.  THE  PLOT  TAPE  WTLL  BE  7-TPACK  STRANGER  TAPE,  556  BPI , ON  TAPE48. 

IF  A labelled  tape  is  USED,  F=S  IS  REQUIRED.  A USER  MAY  WRITE  IN  OTHER 
THAN  FILE  1 OF  HIS  TAPE  IF  DESIPED,  BUT  MULTIPLE  FILES  CANNOT  BE 
WRITTEN  ON  THE  SAME  TAPE  BY  INDEPENDENT  JOBS  SUBMITTED  NEAR  THE 
SAME  TIME,  SINCE  NO  JOB  SEQUENCING  IS  GUARANTEED. 

L AnFL,TAPF4R,L=XXXXPL0T,F=S,D=HI, W, VSN=CA9B99,RING. 
R*^QUEST,TAPP4R,HI,S,VSN=CA9999,PING. 

IF  THP  FILMPL  file  IS  USED  FOR  4020  OUTPUT,  NO  TAPE  IS  REQUIRED. 

10.  ROUTINES  PNPLOT.  LGCHAP,  CUPVP  AND  SIXFN,  WHICH  CALL  ON  THE  SCORS 
PACKAGE,  HAVE  BEEN  AODPO  TO  SC4020. 
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*•*  SAMPLE  4020  USAGE  **• 


USEP'S  OWN  TAPE 


USEPSC,CMSOOOO,nOO,MTl,P3. 
CHA9GE,USFP, JJJJJJJJJJ. 

ftn. 


NAME  / CODE 


•*  mount  TAPE  ONLY  AFTER  GOOD  COMPILE 


LAPEL, TAPP4«,L=USER4020,D=HI,F=S,W,VSN=CA9999, RING.  OR  REQUEST 

ATTACH, SC4020. 

LOSET,LIR=SC4020. 

LGO. 

• 7/a/9  FOR 

PROGRAM  PLGRO (INPUT, OUTPUT, TAPE5= INPUT , TA PE6=0UTPU T , T A PE4fl , . . . ) 

(OWN  FORTRAN  PROGRAM) 

» 7/A/9  FOR 

(CATA  CARDS) 

•*  6/7/a/9  EOF 


BATCH  PLOT  QUEUE 


NAME  / CODE 


USFRP,CM50000 ,P3,T300. 

CHARGE,USER, JJJJJJJJJJ. 

FTN,CPT=1 . 

ATTACH, SC4020. 

LDSET,LTR=SC40?0. 

LGC  (,,FILHPL)  OVERRIDE  THIRD  FILE  NAME 

* 7/a/9  FOR 

PROGRAM  PLTESf INPUT, OUTPUT, TAPE48, . . . ) 

(CWN  FORTRAN  PROGRAM) 

• 7/8/9  FOR 

(CATA  CARDS) 

••  6/7/R/9  EOF 
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SC9060 


META  USER  INFORMATION 
(SC«f  060) 


META  LANGUAGE  FOR  SC4060  TG  OUTPUT  BY  INTEGRATED  GRAPHICS  SOFTWARE, 
A PACKAGE  OF  ?f,  SUBROUTINES  FOR  GRAPHING,  BASIC  GEOMETRY,  STRINGS 
OF  TEXT,  AND  NUMERIC  DATA.  THE  MODE  ARRAY,  A 200  WORD  COMMUNICATION 
REGICN  IN  THE  USER  PROGRAM  SHOULD  NOT  BE  OVERLAYEO. 

TO  PROPERLY  GENERATE  AN  10  FRAME 

CALL  lOFRMG  (Z,  NAME,  CODE,  PHONE) 

WHERE  7 IS  THE  MODE  ARRAY  AND  THE  OTHER  ARGUMENTS  ARE  HOLLERITH  DATA  UP 
TO  8 characters. 

each  frame  advance  IS  PPOGRAMMFO  BY  CALL  PAGEG( Z, 0, 1, 1 ) 

TO  EMPTY  THE  BUFFERS  AT  END  OF  RUN  CALL  EXITG(Z) 

BATCHED  OUTPUT  FOR  THE  META  PACKAGE  MAY  BE  WRITTEN  TO  FILE  FILMPR 
BY  INCLUDING  FILMPR, TAPE10=FILMPR  ON  THE  PROGRAM  CARD  OR 
OVERRIDING  THE  PROPER  FILE  POSITION  ON  LGO. 


USERMT,CM50000,P3,T100.  NAME  / CODE 

CHAPGE,USER, JJJJJJJJJJ. 

FTN. 

ATTACH, SC4060.  META  LIBRARY 

LDSET,LIB=SC4060. 

LGC(,,, FILMPR)  OVERRIOE  FOURTH  FILE  NAME 

• 7/8/9  FOR 

PROGRAM  USE  I T fINPUT, OUTPUT, T APE7 , TAPEl 0 , T APE5= INPUT ) 

(USER  PROGRAM) 

» 7/8/9  EOR 

(USER  DATA) 

" 6/7/S/9  EOF 
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***  OISSPLA  (PROPRIETARY)  ••• 

THE  niSPLAY  INTEGRATEO  SOFTWARE  SYSTEM  ANO  PLOTTING  LANGUAGE 
(DISSPLA)  IS  A orcKAGE  OF  MACHINE  INDEPENDENT  SUBROUTINES  WHICH  MAY 
INTERFACE  WITH  THE  PTNSRDC  CALCOMP  PLOTTERS,  SC4060,  IGS274,  ANO 
TEKTRONIX  TERMINALS  OR  MAY  CREATE  A DEVICE  INDEPENDENT  FILE  FOR  LATER 
POST-POOCFSSING  ON  ANY  ^LOTTING  DEVICE. 

1.  PIPECT  USE  0*^  OISSPLA  IN  PATCH  JOBS  REQUIRES  THREE  EDITLIB 
ITPRBRIFSl  ATTACH, DISSPLA. 

ATTACH,NSRDC. 

ATTACH,PLOTL IB.  WHERE  PLOTLIB  IS  CALC936, 

CALC76T,  CALC170,  SC4060,  TEK4A,  TEK30. 
WHFK  LfADING  THE  USER  PROGRAM,  BEGIN  THE  LOAD  SEQUENCE  WITHI 

LOSFT,LIB=OISSPLA/NSROC/ PLOTLIB. 

COPE  RFQUIREMFNTS  will  be  from  70000  TO  120000. 

?.  FOR  THE  SC4060  INTERFACE,  THE  FIRST  OISSPLA  REFERENCE  IN  USER 

ISt  CALL  SC4060  (flHNAME  ,8HC00E  ,8HTEL  ) 

^LCT  OUTPUT  HAY  RE  WRITTEN  TOI 

USERS  OWN  TAPE  (TAPEIO  ON  FORTRAN  PROGRAM  CARO) 

FILMPR  (FILMPR,TAPE10=FILMPR  on  PROGRAM  CARD) 

SC40eG  processing  must  re  by  THE  "META"  PROGRAM.  (SEE  CCRM  10-22) 

3.  FOP  THF  CALCOMP  INTERFACES,  THE  FIRST  DISSPLA  REFERENCE  IN  USER 
•ROGRAM  ISt  CALL  CALCMP  (10) 

USER  MUST  SUPPLY  HIS  OWN  TAPE  FOR  TAPEIO.  (SEE  CCRM  10-14) 

THE  CALC7G3  CALCOMP  INTERFACE  POUTING  NEEDS  TAPEIO  ON  THE  FORTRAN 
PRt’GRAM  CARD. 

'ALC17A  CREATES  FILE  "PLOT"  WHICH  MUST  BE  RUN  FROM  OR  ROUTED  TO  THE 
1700  BATCH  TERMINALS  AF  OR  AG.  "PLOT"  NEED  NOT  BE  ON  THE  FORTRAN 
PROGRAM  CARD. 

♦.  THF  IGS274  INTERFACE  REQUIRES  ONLY  THE  FIRST  TWO  ATTACH  CAROS 
OF  1.  ABOVE.  WHEN  LOADING  THF  274  USER  PROGRAM,  BEGIN  THE  LOAD 
SFCUFNCE  with:  LDSET,LIB=niSSPLA/NSRDC/IGS274. 

THE  FIRST  DISSPLA  REFERENCE  IN  USER  PROGRAM  ISI 

CALL  IGS274  (NCON)  WHERE  NCON  IS  THE  CONSOLE 

NUMBER  (1,  21B,  OR  31B). 

NO  INTERACTION  IS  POSSIBLE  WITH  THE  DRAWINGS  CONSTRUCTED  ON  274  SCOPE 
EXCEPT  BY  DATA  IN  THE  BATCH  JOB. 

•i.  THE  DTRFCT  TEKTRONIX  INTERFACES  CANNOT  GENERALLY  BE  USED  DUE  TO 
FXCFSSIVF  CORR  REQUIREMENTS.  THE  FIRST  DISSPLA  REFERENCE  IN  USER 
PROGRAM  ISt  CALL  TEKTRN  (IBAUD)  WHERE  IBAUO  IS  480  OR 

300  . 

UNDER  INTERCOM,  THE  TEKTRONIX  IS  NORMALLY  USED  INDIRECTLY  (SEE  6. 

AND  8,  BELOW). 
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6.  WHEN  IT  HAY  RE  NECESSARY  TO  OUTPUT  A GIVEN  SET  OF  PLOTS  ON  MORE 
THAN  ONE  TYPE  OF  PLOTTING  DEVICE,  TO  ALLOW  FOR  INTERACTIVE  VIEWING  ON 
THE  TEKTRONIX  TERMINALS,  OR  TO  ALLOW  FOR  LATER  EDITING  OF  THE  PLOT 

infcrmattcn;  a device  independent  interface  can  prepare  compressed 

OUTPUT  ON  FILE  “PLFILE"  FOR  USE  BY  ANY  POST-PROCESSORS.  ONLY  THE  FIRST 
TWO  ATTACH  CARDS  OF  1.  ABOVE  ARE  NEEDED.  THE  USER  PROVIDES  FOR 
"PLFILF"  DYI  REQUEST, PLFILE,*PF. 

TO  LCnn  THE  USER  PROGRAM,  BEGIN  THE  LOAD  SEQUENCE  HITHI 

LOSET,LIR=niSSPLA/NSROC. 

“PLFILF-  NFFO  NOT  BE  ON  THE  FORTRAN  PROGRAM  CARO. 

THE  FIRST  niSSPLA  RFFERENCE  IN  USER  PROGRAM  ISI 

CALL  COMPRS 

CATALOG  "PLEILE”  FOR  LATER  PROCESSING  WITH  ONE  OF  THE  POST-PROCESSORS. 

7.  AFTER  the  DEVICE  INTERFACE  ROUTINE  CALL,  THE  NEXT  DISSPLA 

REFERENCE  MUST  BE  CALL  BGNPL  (N)  WHERE  N IS  THE  PLOT  NUMBER. 

EACH  PLOT  ENOS  WITH  CALL  ENDPL  (N» 

TO  PROPERLY  FLUSH  THE  PLOT  OUTPUT  BUFFERS,  THE  LAST  DISSPLA  REFERENCE 
IN  ALL  USER  PROGRAMS  MUST  BEI 

CALL  DONEPL 

8.  -PROCESSORS  CONTAINED  ON  EDITLIB  FILE  "DISPOST"  INCLUDE 

PC  '’OPUOGO,  P0P274,  TEK480,  TEK300. 

T NIX  POST-PROCESSORS  MAY  BE  USED  INTERACTIVELY. 

SS  A POST-PROCESSORI 

ATTACH, PLFILE,, ...  COMPRESSED  PLOT  DATA 
ATTACH, OISPOST. 

LIBRARY, DISPOST. 

PRECEDE  USF  OF  ••TEK480."  BY  TYPINGt 

SCREEN  (80, 6G) 

PRECEDE  USF  OF  ”TEK300.“  BY  TYPINGt 

FILE,TAPE6?,RT=S. 

OPTICNAL  DATA  CARDS  ALLOW  FOR  WINDOWING,  SCALING,  SELECTIVE  PLOTTING, 
CHANGING  position,  OR  SUPERIMPOSING  PLOTS. 

THE  FIRST  DATA  CARO  FOR  “POP4060.“  MUST  CONTAIN  NAME,  CODE  AND 
TELEPHONE,  EACH  LEFT- ADJUSTED  IN  AN  AlO  FIELD  (3A10). 


PFFFPPNCESt 

CISSPLA 

CTSSPLA 

CISSPLA 

ri^spcp 


POCKET  MANUAL 

REGINNER/TNTERMFOIATE  MANUAL  VOLUME  I 
ADVANCED  MANUAL  VOLUME  II 
(DTSSPLA  POST-PROCESSOR  OPTION) 
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LTBPftPIFS  OF  PftIN  PROGRAMS 


MANY 
9FFN  PUT 
CAPOS  TO 


FPFCUFNTLY 
INTO  LI9RA 
ACCESS  THF 


USEO  PPPGRAMS  AND  MAJOR  PACKAGES  OF  PROGRA 
PTES.  EACH  WILL  REQUIRE  ATTACH  AND  LDSET/L 
OESIRFO  PROGRAM. 


MS  HA 
IBRAP 


VE 

Y 


TO  ACCFSS  ANY  OF  THESE  PUBLIC  LIBRAPIFSt 


ATTACH, LTBNAME. 
LCSET (LIB=LIRNAME) 
PROG. 


WHERE  LIBNAMF  IS  A LIBRARY  DESCRIBED  BELOW 
OR  LIBRARY (LIBNAME) 

NAME  OF  PROGRAM  ON  LIBNAME  TO  BE  EXECUTED 


THF  CURRENTLY 
RIMED 

UTILITY  - 


AVAILABLE  LIBRAPIFS  AREJ 

SELECTED  ROUTINES  FROM  UCLA  BIO-MEDICAL  STATISTICAL 
PROGRAMS 

A WIDE  VARIETY  OF  LOCAL  UTILITY  PROGRAMS 


RIMED 


THIS  LIBRARY  CONTAINS  TESTED  ROUTINES  OF  THF  UCLA  BIO-MEDICAL 
STATISTICAL  PROGRAMS.  OTHERS  WILL  BE  ADDED  AS  REQUESTED.  BIMEO  IS 
AVAILABLE  ON  THE  6700/6G00  AND  CURRENTLY  CONTAINS! 

BMO03O  - CORRELATION  WITH  ITEM  DELETION 
PMOOSn  - GENERAL  PLOT  INCLUDING  HISTOGRAM 

PMD05M  - DISCRIMINANT  ANALYSIS  FOR  SEVERAL  GROUPS 


— CM— 
105000 
6000  0 

7000  0 


BMn03P  - MULTIPLE  REGRESSION  WITH  CASE  COMBINATIONS 
PMDOAP  - PERIODIC  REGRESSION  AND  HAPMONIC  ANALYSIS 
PMC05R  - POLYNOMIAL  REGRESSION 
PMD07R  - NON-LINEAR  LEAST  SQUARES 


70000 
7 0000 
4500  0 
62000 


OMD12V  - MULTIVARIATE  ANALYSIS  OF  VARIANCE  AND  COVARIANCE 


110000 


BIMEDP 

THE  BIMEDP  bio-medical  STATISTICAL  PROGRAMS  FROM  UCLA  ACCEPT  DATA 
WITH  parameter  LANGUAGE  CONTROL  SIMILAR  TO  SPSS. 


THESE  PROGRAMS  APE  CURRENTLY  AVAILABLE  ON  TAPE 
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UTILITY 

'UTILITY*  IS  A LIBRARY  OF  OTNSRDC  WRITTEN  AND/OR  MAINTAINED 
programs,  they  hay  be  executed  by  one  of  the  FOLLOWINGI 

A)  ATTACH, UTILITY. 

LDSET,LIB=UTILITY.  OR  L I BRA RY , UTIL I T Y . 

PROG,....  **  PROGRAM  TO  BE  EXECUTED 

B)  BFGIN,UTTLITY,,PKCG,.... 

ROUTINES  *CCRM*  AND  *PAGEPRT*,  FOR  EXTRACTING  PORTIONS  OF  THIS 
MANUAL,  ARE  LISTED  BELOW.  DOCUMENTATION  FOR  ALL  ROUTINES  IN  'UTILITY* 
HAY  BE  FOUND  IN  CCLIB/U. 


CCRM  EXTRACT  ALL  PAGES  FROM  COMPUTER  CENTER  REFERENCE  MANUAL 

WHICH  WERE  MODIFIED  AFTER  USER-SPECIFIED  DATE 

TO  USE  - CCRM,OUTPUT, MONTH, YEAR, PM. 

OUTPUT  - LISTABLE  OUTPUT 

MONTH  - FIRST  3-i*  CHARACTERS  OF  MONTH 

TE.G.,  JAN,  FEB,  SEPT,  ETC.)  OR  THE 
CORRESPONDING  DIGITS  (1,  ..., 

YEAR  - 2 OR  «♦  DIGITS  OF  YEAR  (E.G.,  77, 
1977) 

(ALL  PAGES  MODIFIED  AFTER  MONTH, 
YEAR  MILL  BE  PRINTED) 

PM  - OMITTED  OR  - DO  NOT  PUT  'PM' 

'NORM'  MESSAGES  IN  OUTPUT 

ANYTHING  ELSE  - PUT  THE  MESSAGE 

'PM  1-PART  NARROW  UNLINEO  PAPER' 
AT  START  OF  OUTPUT  AND 
'PM  RESTORE  PRINTER' 

AT  THE  END 

(USE  ONLY  FOR  PRINTING  AT  TERMINALS 
WHICH  SUPPORT  *PM'  MESSAGES.) 

LOAD  FL  - 30000B 

DEFAULT  - CCRM, OUTPUT, 0,0, NORM. 

(WILL  PRINT  ENTIRE  MANUAL  BUT  IS  NOT 
EFFICIENT) 

EXAMPLE  - TO  PRINT  ALL  REVISIONSl 
CCRM, OUTPUT, MAY, 77. 

REMARKS  - TITLE  AND  'R ' (REVISION  SUMMARY)  PAGES  ARE 
ALWAYS  PRINTED. 


I 


I 
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PAGEPRT  PRINT  SELECTED  PAGF(S)  FROM  A DOCUMENT 

TO  USE  - PAGEPRT,INFILE,ID,OUTPUT,REW,PAGEtINPUT. 

INFILF  - INPUT  DOCUMENT  FILE,  ONE  OF  I 

.1-7  CHAR  PFN  (PROG  WILL  ATTACH) 

.1-7  CHAR  LFN  (FILE  IS  ATTACHED) 
.OMITTED  (COMPUTER  CENTER  REF  MAN) 

ID  - ONE  OF 

.1-7  CHAR  ID  (USE  IF  INFILE  IS  PFN) 
.0  (IF  FILE  IS  ALREADY  ATTACHED) 
.OMITTED  (SYSTEM  PUBLIC  ACCESS  ID) 
OUTPUT  - LI-fABLE  OUTPUT 

RFW  - infile  remind  OPTION 

A - REWIND  AFTER  USE 

B - REWIND  BEFORE  USE 

R - REWIND  BEFORE  AND  AFTER  USE 

(DEFAULT) 

U - REWIND  BEFORE,  REWIND  AND 

UNLOAD  AFTER  USE 
OTHER  - NO  REWIND 
(ANY  WORDS  BEGINNING  WITH  THESE 
LETTERS  IriLL  PRODUCE  THE  SAME 
RESULTS) 

PAGE  - SINGLE  PAGE  DESIRED  (1-7  CHAR) 

-OR- 

IF  OMITTED,  READ  PAGE  NUMBERS  FROM 
FILE  INPUT. 

INPUT  - DATA  CARD  INPUT  FILE  (ONLY  IF  PAGE 
PARAMETER  OMITTED) 

MAX  FL  - 30000B 

DEFAULT  - PAGEPRT,*,**, OUTPUT, REMIND,, INPUT. 

* - COMPUTER  CENTER  REFERENCE  MANUAL 

**  - SYSTEM  PUBLIC  ACCESS  ID 

REMARKS  - IF  SINGLE  PAGE  DESIRED  HAS  8,  0 OR  10  CHARACTERS, 
IT  MUST  BE  ENTERED  ON  A DATA  CARD. 

DATA  - USED  ONLY  IF  PAGE  PARAMETER  OMITTED. 

ONE  OR  MORE  CARDS  WITH  DESIRED  PAGE  NUMBERS 
(ONE  PER  CARD)  IN  COLUMNS  1-10  OF  EACH  CARD. 

EXAMPLE  - PRINT  PAGE  4-2  OF  COMPUTER  CENTER  REF  MANUALJ 
PAGEPRT, ,,,,S4-2t. 

PRINT  PAGES  1-9  AND  1-10  OF  CCRM. 

PAGEPRT. 


• 7/8/9 

EOR 

1-9 

1-10 

“ e/7/8/9 

EOF 
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•**  MISCELLANEOUS  PROGRAMS  ••• 

THE  FOLLOWING  PROGRAMS  ARE  NOT  IN  ANY  LIBRARIES  BUT  MUST  BE 
INCIVIDUALLY  ATTACHED  (SEF  CCLIB) I 


CVT3P)0  A SNOBOL  PROGRAM  TO  CONVERT  DOUBLE  PRECISION  S/360  FORTRAN 

programs  to  single  precision  CDC  FORTRAN. 

COPYBFP  RECREATE  A CDC  “RANDOM  FILE“  FROM  DATA  COPIED  EARLIER  TO  A 

SEQUENTIAL  FILE,  OR  CREATE  A COPY  OF  A RANDOM  FILE.  IT 
MAY  BF  USED  TO  RECREATE  A PROPER  OLDPL  IF  COPYB«^  WAS  USED 
ERRONEOUSLY.  TO  USE 
ATTACHtCOPYBFR. 

COPYBFR, INFILE.OUTFILE. 

COPYS  A GENERAL  PURPOSE  UTILITY  FROM  NORTHWESTERN  UNIVERSITY 

WHICH  PROVIDES  A LARGE  VARIETY  OF  COPY  OPERATIONS  FOR 
SEQUENTIAL  OR  RANDOM  FILES. 
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VTM  programming  PACKAGFS  **• 


LACGF  SYSTFMS  OPDFRFO  FROM  VIM  ARF  OFTEN  ON  SEPARATF  TAPF  FILFG. 


REFERENCE 

APRIPA  all-integer  PROGRAMMING  SYSTE:M  FOR  HI  UTEX  ARRIOA 

SMALL  INTEGER  PROGRAMMING  RRORLFMS 
INCLUniNG  several  SOLUTION  ALGORITHMS. 


CIVCC  CIVIL  ENGINEERING  COMPUTATION  SYSTFMI 

A PACKAGPU  PROGRAM  DFSIGNEO  TO 
CALCULATE  COMPLEX  AND  COMPOUND  CURVES 
ANO  surfaces  in  LARGE  GEOMETRY  PROBLEMS. 


FCAP  electronic  CIRCUIT  ANALYSIS  PROGRAMI  T4  COOA  ECAP 

INTEGRATED  SYSTEM  OF  PROGRAMS  TO  ASSIST 
IN  DESIGN  AND  ANAYLSIS  OF  ELECTRICAL 
CIRCUITS.  A GRAPHICAL  VERSION  HAS 
OBTAINED  FROM  NHL. 


NOVACOM  A COMPUTER  PROGRAM  FOR  NON-ORTHOGONAL  NHL  TR-;>10^ 

ANALYSIS  OF  variance  ANO  COVARIANCE.  NHL  TR-P137 


STRESS  STRUCTURAL  ANALYSIS  LANGUAGE. 

SFE  USERS  ANO  REFERENCE  MANUALS  FOR 
DATA  PREPARATION  AND  PROGRAM  DESIGN. 
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***  OTHFP  SOURCES  OF  PROGRAMS 

A CCLLFCTION  OF  BASIC  ROUTINES  WAS  OBTAINED  FROM  NOL. 

SHAPE  FORTRAN  LIBRARY  ROUTINES  (ON  FILE  FROM  IBM  7090). 

SOME  MEDIUM  SPEW'D  RFMOIF  TERMINALS  USE  A HOUSTON  PLOTTER  PACKAGE. 

special  PURPOSE  COMPLETE  PROGRAMS  AND  PROGRAMMING  LANGUAGES  WHICH  WERE 
PURCHASED  FROM  OTHER  ORGANIZATIONS  ARP  DISCUSSED  IN  CHAPTER  11. 

USERS  may  contribute  routines  TO  THE  LIBRARY. 

ROUTINES  MAY  BE  ORDERED  FROM  VIM,  THE  CDC  6000  USERS  GROUP.  REQUESTS 
FOP  VTH  ROUTINES  SHOULD  BE  MADE  TO  CODE  1892. 
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PROGRAM  DOCUMENTATION 


COrUMPNTA TION  FOR 
CAN  PF  ORTATN'^D  FROM 


THF  SYSTEM  AND 

IS  OBT 

(SEE  CCLIB/Pt 

PROGDOC 

BEGIN, 

UTILITY 

WHERE  LIB 

IS  ONE 

UTILTT 

NSRDC 

OTHER 

PROFIL 

PROG 

IS  ONE 

NAME 

ALL 

PROGRAMS,  SUBPROGRAMS  AND  PROCEDURES  (CCRM,  7-21) 
CODE  1P92.  SOME  DOCUMENTATION  IS  AVAILABLE  FROM 
AINFO  By  USING  PROGRAM  PROGDOC  IN  LIBRARY  UTILITY 
) WITH  THF  FOLLOWING  GENERAL  CONTROL  CARD! 

,, PROGCOC, LIB, , PROG. 

OF 

Y - PPOGOAMS  ON  LIBRARY  UTILITY 

- SOMF  ROUTINFS  ON  LIBRARY  NSRDC 

- SOME  MISCELLANEOUS  ROUTINES 

- PUBLIC-ACCESS  PROCEDURES  CCCRM,  7-21?  CCLIB/P) 
OF 

- LIST  THIS  document 

- LIST  ALL  DOCUMENTS 


mACHINP-RFADARLF  documents  describing  PROGRAMS,  SUBPROGRAMS  AND 
PPCCFDURFS  ARE  PRINTED  IN  CCLIB,  CCLIB/N,  CCLIB/P  AND  CCLIB/U. 


SOURCE  CODE  *** 

THF  SOURCE  CODE  FOR  MANY  ROUTINFS  IS  AVAILABLE  IN  UPDATE  LIBRARIES 
FOP  USER  MODIFICATION.  SEE  EXAMPLE  ON  CCRM,  7-6  (TOP).  NOTE  THAT  VSN 
AND  LAPEL  CAROS  WILL  RE  DIFFERENT  FOR  EACH  TAPE  (SEE  BELOW). 


LIBRARY 

MACHINE 

BIMFO 

6700/6600 

label, LIRP,L 

6400 

LABEL, LIRP,L 

NSPCC 

6700/6600 

ATTACH, OLDPL 

LABEL, LTBP,L 

6400 

LABEL, LIBR,L 

SC4020 

6700/6600 

label, LIBP,L 

6400 

LABEL, LIBP,L 

SSP 

6700/6600 

LABEL, LIBR,L 

6400 

LABEL, LIBR,L 

UTILITY 

6700/6600 

ATTACH, OLDPL 

SOURCE  CODE  LOCATION 

=CLIBBIMEO,0=HY,R,VSN=CA0278,NORING. 

=CL IBRIMEO,D=HY,R,VSN=C J0347,NORING. 

,NSROCPL,ID=CSYS. 

=CLIBRARYUP03,0=HY,R, VSN=CA0279,NORING. 
=CLIRRARYUPn3,O=HY,R,VSN=CJ0348,NORING. 

=CLIBRARYUP03,0=HY,R, VSN=CA0279, NORING. 
=CLIBRARYUPD3,0=HY,R, VSN=CJ0348,NORING. 

=CLIBRAPYUPD3,O=HY,R,VSN=CA027 9, NORING. 
= CLIRRARYUP03,D  = HY,R, VSN=C jo  348, NORING. 

,UTILITYPL,ID=CSYS. 
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*****  SPECIAL  PURPOSE  PROGRAMMING  LANGUAGES  ***** 

THIS  CHAPTER  DISCUSSES  VARIOUS  PROGRAMMING  LANGUAGES  AND  PACKAGES 
AVAILABLE  ON  THE  DTNSROC  6000  COMPUTERS. 


***  ALGOL  *** 

•ALGOL420*  IS  A PUBLIC-ACCESS  PERMANENT  FILE.  EXECUTION  OF  AN 
ALGCL-60  PROGRAM  IS  BY  THE  FOLLOWING  SEQUENCE  OF  CONTROL  CARDS 
PREFERENCES  ON  THIS  PAGE  ARE  TO  THE  CDC  ALGOL  VERSION  4 REFERENCE 
MANUAL,  PUBLICATION  NUMBER  603R4700  OR  60496600). 

JOB  CARO  WITH  AT  LEAST  CM46000  NAME  / CODE 

CHARGE,.... 

ATTACH, ALGOLIB,ALGOL420.  USE  THIS  LFN  (ALGOLIB) 

LIBRARY, ALGOLIB. 

ALGOL.  SEE  CHAPTER  6 FOR  OPTIONAL  PARAMETERS 

RFL,NNNNNN.  NNNNNN  IS  THE  JOB  CARD  CM  (USUALLY  REQUIRED) 

LGO. 

• 7/fi/g  FOR 

(ALGOL  MAIN  PROGRAM  AND  PROCEDURES) 

• 77R/9  FOR 

(SET  OF  CHANNEL  CAPOS) 

(DATA  CAROS) 

• 7/R/9  FOR 

~ 6/7/R/9  EOF 

THE  MAIN  PROGRAM  AMO  EACH  PROCEDURE  EXCEPT  THE  LAST  MUST  BE 
FOLLOWED  BY  AN  »EOP*  CARD  (4-4).  THE  SET  OF  CHANNEL  CARDS  IS  REQUIRED 
ONLY  WHEN  CHANNELS  OTHER  THE  STANDARD  (60  FOR  INPUT,  61  FOR  OUTPUT)  ARE 
USEC.  IF  THERE  ARE  NEITHER  CHANNEL  CAROS  NOR  DATA  CARDS,  THE  6/7/S/9 
CARC  HAY  FOLLOW  THF  LAST  END  CARD. 

note  - ALL  ALGOL  KEYPUNCHING  SHOULD  BE  DONE  ON  026  KEYPUNCHES. 

THF  square  bracket  SYMBOLS  ARE  BEST  IMPLEMENTED  BY  "(/”  AND  ”/)**. 

THF  FOLLOWING  HINTS  MAY  PROVE  USEFUL.  THE  EASIEST  WAY  TO  OUTPUT 
VAPIABLES  AND  ARRAYS  IS  VIA  •’OUTREAL"  AND  “OUTARRAY**  PROCEDURES 
(3-?5).  THESE  MAY  ALSO  BE  USED  TO  OUTPUT  INTEGER  VARIABLES  AND  ARRAYS 
USING  THF  REAL  FORMAT. 

THE  CDC  TMolFMENTATION  OF  ALGOL  DIFFERS  FROM  THE  PUBLICATION 
LANGUAGE  IN  REGARD  TO  THE  FORMAL  PARAMETERS  OF  A PROCEDURE.  ALL 
oAPAMETECS  of  a pROCEOUPE  must  RE  DECLARED  APPROPRIATELY.  FOP 
EXAMPLE,  IN  MANY  PUBLISHED  ALGOPITHMS  FORMAL  PAPAMETEPS  WHICH  ARE  THE 
NAMES  OF  PROCEDURES  ARE  NOT  DECLARED  (2-49t  5.4.6).  ALSO,  ALL 
PPCCFOURES  called  IN  A PROGRAM  MUST  BE  DECLARED  VIA  THE  "CODE"  SYMBOL 
(2-5(!).  ALGOL  AND  FORTRAN  PROGRAMS  MAY  CALL  EACH  OTHER  (3-50). 

EACH  ALGOL  SYMBOLIC  WORD  IN  THE  REFERENCE  LANGUAGE  IS  REPRESENTED 
IN  CDC  BY  “WORD",  WHFop  ••  (QUOTE)  IS  THE  4-5  PUNCH. 
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•»*  AUTOMATICALLY  PROGRAMMED  TOOLS  (APT)  *** 

\[  the  apt  system  TS  used  to  prepare  punched  paper  tapes  FOR 

NUMERICALLY  CONTROLLED  MACHINE  TOOLS,  FROM  INPUT  LANGUAGE  DESCRIOING 
A PART  TO  RE  MACHINED,  APT  GENERATES  THE  DETAILED  COMMANDS  NECESSARY 
TO  CIRFCT  THE  MOTIONS  OF  A NC  MACHINE  TOOL.  USING  THIS  SYSTEM, 

EVEN  complex  PARTS  CAN  RE  MACHINED  QUICKLY,  ACCURATELY,  AND 

inexpensively. 

IN  APT^,  AN  EXTENSION  TO  APT  CALLED  FMILL  IS  AVAILABLE  EOR 
MACHINING  OF  APRITRARTLY  SHAPED  THREE-DIMENSIONAL  SURFACES  SUCH  AS 
FOUND  ON  MODEL  PROPELLERS  AND  MODEL  SHIP  HULLS.  IT  ACCEPTS  AS  INPUT 
ANY  RECTILINEAR  MESH  OF  X-Y-Z  COORDINATES.  POST  PROCESSORS  IMPLEMENTED 
WITH  APTT  INCLUDE*  GECENT,  BENDIX,  COLTMC. 

A NEWER  VERSION  OF  APT  (APT4)  IS  ALSO  AVAILABLE  ON  PERMANENT  FILE. 
there  APE  NO  POST  PROCESSORS  INSTALLED  IN  APT4.  POST  PROCESSING  IS 
POSSIRLF  USING  AN  OPTION  UNDER  APTT, 


APT3  SAMPLE  SETUP 


JOPN AME ,CM65200. 

CHARGE, XX XX, J JJJJJJJJJ. 
COPYCR, INPUT, I Nr  ILF- 
REWIND, INFILF. 

NAME  / CODE 

1 

] 

ATTACH, APT3. 

** 

APT3  SYSTEM 

APT3, INFILE. 

EXECUTE  APT3 

ATTACH, PUNTAP. 

PAPER  tape  punch  PROGRAM 

PUNTAP. 

• 7/«/9  FOR 

PUNCH  paper  tape 

(APT  SOURCE  CARDS) 

7/R/q  FOP 

(PUN'TAP  DATA  CARD) 
E/7/fl/q  EOF 


APT4  SAMPLE  SETUP 

JOBNAME,Cmi??000.  name  / CODE 

CH  APGE.XXXX, JJJJJJJJJJ. 

ATTACH, APT4.  **  APT4  SYSTEM 

APT4.  EXECUTE  APT4 

(PUNTAP  MAY  RE  EXECUTED  HERE  AS  ABOVE) 

• 7/fl/q  POP 

(APT  SOURCE  CARDS) 

G/7/q/q  FOE 

oFFEPENCE*  automatically  PPOGPAMMpD  tooling  system  (APT  IV)  VERSION  2 


reference  manual,  CDC  pur.  no.  17326900. 
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CHECKPOINT/RFSTART 

CHECKPOINT  DUMPS  MAY  BE  TAKEN  BY  THE  PROGRAMMER  PERIODICALLY  DURING 
LONG  RUNNING  JOBS  (FOR  EXAMPLE,  OVER  30  MINUTES  MALL  CLOCK  TIME). 

THEN  RESTART  IS  USED  TO  REINITIATE  THE  JOB  FROM  A DUMP  IN  EVENT  OF 
PROGRAM  OR  SYSTEM  FAILURE.  CHECKPOINT  DUMPS  MAY  BE  CALLED  BY  A CONTROL 
CARD  OR  FROM  A USFP  PROGRAM.  (SEE  NOSBE,  4-12,  4-721  SCOPE,  CHAPTER  10) 

CONTROL  CARO  CKP. 

FORTRAN  EXT.  CALL  CHEKPTX ( TV AR)  WHERE  IVAR=0 

UNLESS  THE  USER  REQUESTS  OR  LABELS  A TAPE  WITH  CHECKPOINT  DISPOSITION, 
THE  SYSTEM  HILL  REQUEST  A SCRATCH  TAPE  FOR  THE  DUMPS.  THE  JOB  CARD 
MUST  ALLOW  FOR  THIS  MT.  EACH  USER  SHOULD  PROVIDE  FOR  HIS  OWN 
CHECKPOINT  TAPE.  THE  CK  PARAMETER  IS  REQUIRED  ON  ANY  LABEL  OR 
REQUEST  CARO  FOR  A CMFCKPOINT  REEL. 

L ABFL,CCCCCCC,L=XXXXCKPT,X=CK, D=HY , RI NG , VSN=C B9999, H . 

(USE  ABOVE  LABEL  CARO  FOR  INITIAL  CHECKPOINT  RUN. 

FOR  RESTART,  CHANGE  PARAMETER  *W»  TO  »R*.) 

THE  SYSTEM  USES  FILE  NAMES  CCCCCCC,  CCCCCCI,  CCCCCCM,  AND  CCCCCCO. 

IF  ANY  DEVICE  SET  IS  USED  IN  THE  JOB,  USER  MUST  ‘MOUNT*  THE  DEVICE 
SET  BEFORE  THE  ‘RESTART*  CARO.  IF  ANY  TAPES  ARE  USED  IN  THE  JOB,  USER 
SHOULD  SUPPLY  *VSN*  CARO(S)  (NOT  LABEL  OR  REQUEST)  BEFORE  *RESTART*. 

RESTART, FILENM,NUM. 

WHERE  FILENM  IS  CHECKPOINT  TAPE 

(OEFAULTt  CCCCCCC) 

NUM  CHECKPOINT  DUMP  TO  RESTART  FROM 

(OEFAULTt  1) 

IF  THE  RESTART  TAPE  IS  A MULTI-REEL  FILE,  IT  IS  POSSIBLE  TO  RESTART 
FROM  OTHER  THAN  THE  FIRST  TAPE. 

CHECKPOINTS  MAY  NOT  BE  TAKEN  IN  A PROGRAM  USING  RANDOM  ACCESS 
(REACMS)  files  UNLESS  THEY  APE  PREVIOUSLY  CATALOGED. 

IF  A MULTI-STEP  JOB  TAKES  A CHECKPOINT  BETWEEN  STEPS  OF  THE  JOB, 

THE  RESTART  WILL  COMMENCE  EXECUTING  CONTROL  CAROS  AT  THE  IMMEDIATELY 
NEXT  STEP  AFTER  THE  ‘CKP.*  CARD.  NO  ALTERATION  OF  *INPUT*  CONTROL 
CAROS  OP  DATA  RECORDS  IS  ACCEPTFO,  AS  NO  CAROS  IN  THE  RESTART  JOB 
STREAM  WILL  BF  LOOKED  AT  AFTER  THE  *RESTART.  * CARD.  FOR  A MULTISTE» 
JOB  TO  CHECKPOINT  ONLY  IN  CASE  OF  ERROR  (AFTER  EXIT),  A BFGIN/REVERT 
PROCEDURE  MUST  FOLLOW  THE  *CKP.‘. 
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CHECKPOINT  EXAMPLES  - FTN 


1 


C 


1 


c 


c 


PROGRAM  SGLONG  (I NPUT, OUTPU T, TAPE6=0UTPUT ,T APE5= INPUT ) 
DATA  IVAR/0/ 

B=TIME (DUM) 

DFCOOE(10,5,B)  IH,IM,IS 
ITIME  = IH*3600  ♦IM*60  *15 
FNTFR  LONG  PROGRAM  LOOP 
no  GOO  K=l,1000 


• • • • 

TAKE  CHECKPOINT  DUMP  EVERY  20  CLOCK  MINUTES 
5 F0RMAT(3<1X,I2) ) 

B1=TIME (DUM) 

DECOOEllO,5,Bl»  IH,IM,IS 
INOW  = IH*3600  ♦IM»60  *13 
IFdNOW-ITIME  .LT.  1200)  GO  TO  15 
CALL  CHEKPTXfIVAR) 

RECALCULATE  STARTING  TIME  IN  CASE  OF  A RESTART 
B=TIME(DUM) 

DECODE (10,5, B)  IH,IM,IS 
ITIME  = IM*3600  ♦IM*60  *13 
15  CONTINUE 
500  CONTINUE 
STOP 
END 


PROGRAM  SGLONG  (INPUT, OUTPUT, TAPE6=0UTPUT,TAPE5=INPUT) 
DATA  IVAR/0/ 

B=SECONO(OUM) 

C ENTER  LONG  PROGRAM  LOOP 
DO  500  K = 1,1000 


• • • • 

C TAKE  CHECKPOINT  DUMP  EVERY  360  CPU  SECONDS 
Pl=SECOND(DUM) 

IF  (Bl-B  .LT.  360.)  GO  TO  15 
CALL  CHEKPTX(IVAR) 

C SET  NEXT  TIME  INTERVAL 
P=B1 

15  CONTINUE 
*•00  CONTINUE 
STOP 
END 


NOTE—  BY  DELETING  CAROS  ABOVE,  COULD  CHECKPOINT  EACH  LOOP 
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OPERATOR  CHECKPOINT 

AT  END  OF  SHIFT  OR  WHEN  A LONG  RUNNING  JOB  MUST  BE  TERMINATED, 

THE  CURRENT  STATUS  OF  THE  JOB  MAY  RE  PRESERVED  ON  TAPE  FOR  RESTART  AT  A 
LATER  TIME  BY  OPERATOR  ACTION. 

1.  N.LOCKIN.  TO  LOCKIN  THE  JOB 

2»  N.CHECKPT.  TO  SAVE  THE  CURRENT  STATUS  OF  JOB  ON  TAPE 

3.  N. ASSIGN  XX  LOAN  THE  USER  AN  UNLABELLEO  SCRATCH  TAPE. 

PASTE  ON  A LABEL  WITH  JOBNAME  AND  DATE. 

HOLD  24  HOURS.  (E.G.  CALMKDR,  6/30/77) 

4.  N. COMMENT.  RESTART  JOB  USING  TAPE  . SEE  USER  SERVICES 

N. COMMENT.  DROPPING  JOB  DUE  TO  . 

5.  N.DROP.  TO  VACATE  CONTROL  POINT. 

6.  USER  MAY  RESTART  THE  JOB  BY  PUTTING  IN  A 4 CARD  JOB. 

XXXX,CMNNNNNN,MT1,TNNN.  NAME  / CODE 

CHARGE, XXXX,JJJJJJJJJJ. 

VSN,CCCCCCC=XXXXYY. 

RESTART, CCCCCCC,!. 

••  6/7Z8/9  EOF 

NHERE  TNNN  IS  TIME  REQUIRED  TO  COMPLETE  JOB 

CMNNNNNN  is  core  required  to  run  the  JOB 
MT  MUST  ALLOW  FOR  MOUNTING  THE  RESTART  TAPE 
XXXXYY  IS  THE  FIRST  6 CHARACTERS  OF  THE  JOB  NAME  BEING 
RESTARTED,  AS  PASTED  ON  SCRATCH  TAPE. 

FINAL  OUTPUT  OF  THE  RESTARTED  JOB  HILL  INCLUDE  ALL  OUTPUT 
COMPUTED  AND  PRINTED  BEFORE  THE  RESTART  HAS  BEGUN. 
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COMRADF  - COMPUTFR-AIOED  DESIGN  ENVIRONMENT 

THF  nOMRADF  EXECUTIVE,  FUNCTIONING  UNDER  INTERCOM,  ALLOWS  SYSTEM 
DESIGNERS  TO  CONSTRUCT  APPLICATION  SUBSYSTEMS  WHICH  CAN  BE  USED  THROUGH 
NOK-COMPUTFR  ORIENTED  PROCEDURES.  EACH  SUBSYSTEM  CONSISTS  OF 
INTERRELATED  “COMMAND  PROCEDURES"  WHICH  AUTOMATICALLY  INVOKE  A SEQUENCE 
OF  COMPUTER  ACTIONS.  THESE  PROVIDE  FOR  TUTORIAL  MESSAGES,  DATA  INPUT 
REQUESTS,  DYNAMIC  PROGRAM  INIIIATION,  CONTROL  CARD  EXECUTION,  AND 
SUBMISSION  OF  BATCH  JOBS. 

COMRADE  PROVIDES  CAPABILITIES  FOR  CONTROLLING  ACCESS  TO  COMMANDS 
AND  FILES,  AND  FOR  REPORTING  ON  SYSTEM  USAGE.  ALSO  INCLUDED  IS  A DATA 
MANAGEMENT  SYSTEM  WHICH  ALLOWS  THE  DEFINITION,  UPDATING  AND  QUERYING  OF 
COMPLEX  DATA  STRUCTURES  USING  EITHER  FORTRAN-CALLABLE  SUBROUTINES  OR 
USER-ORIENTED  COMMAND  PROCEDURES. 

the  following  subsystems  are  currently  WITHIN  COMRADEt 
ISOS 

PERSONNEL 

SHARP 

SYST 

GENERAL 

FOP  FURTHER  INFORMATION,  CONTACT  BILL  GORHAM,  CODE  1828,  1202)  227-1286. 


***  COMPASS 

THF  COMPASS  ASSEMBLER  IS  USED  TO  MAINTAIN  MANY  OF  THE  NOS/BE  SYSTEM 
ROUTINES  FOR  CPU  AND  PPU.  SOURCE  STATEMENTS  INCLUDE  PSEUDO-INSTRUC- 
TIONS, MACROS  AND  MICROS  AS  WELL  AS  SYMBOLIC  MACHINE  INSTRUCTIONS. 
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nflTA  MflNftGFMFNT  SYSTEM  170 


(OMS170) 


• • • 


r«si7o 


TS  CONTPOL  DATA’S  IMPLEMENTATION  OF  A COMPPEHENSI VE 
SYSTEM.  AMONG  THE  MAJOR  COMPONENTS  OF  DMS170  AREt 


DATA 


DATA  DFSCPIPTION  LANGUAGE  (DDL) 

THIS  COMPILER  DESCPIOES  THF  DATA  BY  CREATING  SCHEMAS 
(WHICH  DESCRIBE  THE  ORGANIZATION  AND  FULL  RECORD  CONTENT 
OF  THE  DATA  BASF)  AND  SUR-SCHEMSA5  (WHICH  DESCRIBE  SETS  OF 
DATA  elements  TO  BE  OPERATED  ON  VIA  COBOL  OR  Q/U).  IT  IS 
one's  implementation  of  the  COOASYL  data  base  task  GROUP 
data  DPSCRIPTION  language. 


QUERY  UPDATP  (Q/U) 

THIS  SPECIAL  ENGLISH-LIKE  LANGUAGE  ALLOWS  RETRIEVAL, 
manipulation  and  UPDATE  OF  DATA  BASE  ELEMENTS  AND  INCLUDES 
REPORT  WRITER  CAPABILITY.  IT  CAN  ACCESS  DATA  USING  DDL 
SUB-SCHEMA  OR  DIRECTLY  USING  Q/U  DESCRIPTION  OF  FILE.  IT 
ALLOWS  BATCH  OR  INTERACTIVE  SESSIONS.  (NOTEt  CURRENT  COPE 
REQUIREMPNTS  OF  APPROXIMATELY  7000C  WORDS  RESTRICTS  USE  TO 
batch  only.) 

CYBER  DATABASE  CONTROL  SYSTEM  (CDCS) 

THIS  HANDLES  DATA  MAPPING,  DATA  VALIDATION,  TRANSACTION 
LOGGING,  AND  DATA  BASE  PROCEDURE  LINKING. 

DATA  BASF  UTILITIES 

UTILITIES  ARE  PROVIDED  FOR  LOGGING  AND  DATA  BASE  RECOVERY. 


PMS170  PROVIDES  HIGH  LEVEL  DATA  BASE  MANAGEMENT  FEATURES  SUCH  AS 
data  SFCIJRITY,  TRANSPARENCY  OF  DATA  ORGANIZATION  TO  END  USER,  LOGGING 
AND  PPCOVFRY,  FTC.  WHILE  USING  STANDARD  CDC  RECORD  MANAGER  TECHNIQUES 
FOR  ACTUAL  DATA  FILP  ORGANIZATION. 

RFFFRPNCES  PO®  FURTHER  INFORMATION. 

DMS170  DATA  ADMINISTRATORS  USER'S  GUIDE  60499100 

DDL  REFERENCE  MANUAL  VOL.  1,  Z,  3 60498400,500,600 

QUERY  UPDATE  3 REFERENCE  MANUAL  60498300 


QUPR 

Y UPQATP  3 

USER'S  GUIDE 

603877 

CODS 

RF’^'ERFNCP 

MANUAL 

604987 

n •*.  A 

PAGE  UTTLI 

TIES 

604988 

1 
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MAPt;  VI  *** 

PARS  VT  VERSION  ?.l  IS  A RFIRIf-VAL  SYSTEM  DESIGNED  RQR  E'JLL  INTER- 
RACE  with  high  LFVEL  RRDGPAMS  (FORTRAN,  CODOL ) . MARS  ORDERS  DATA  BASF 

files  in  two  ways. 

(1)  PARTIAL  INVERSION 
(?>  FULL  INVERSION 

BOTH  DATA  FILE  ORGANIZATIONS  GAN  BE  USED  UNDER  VERSION  2.1  OF  MARS. 

PARTIAL  INVERSION  ALLOWS  FOR  COMPLETE  HIGH  LEVEL  PROGRAM  INTERFACE. 
IT  WCRKS  ON  FILES  WHICH  CAN  BE  CRRATFD  BY  EITHER  FORTRAN  OR  COBOL.  THE 
"RECCRC”  file  PRODUCFO  BY  MARS  CAN  BE  READ  BY  FORTRAN/COBOL.  THERE  ARE 
THRFP  major  files  TO  BF  CONSIDERED  IN  USING  MARS- 
(1)  DATA  FILE  - INITIAL  INPUT  FILE 

GENFRATRD  IN  COBOL  OR  FORTRAN 
(?)  RECORD  FILE  - SEQUENTIAL  RETRIEVAL  FILE,  SIMILAR  TO 

ORIGINAL  DATA  FILE  WITH  DIFFERENT  BLOCKING. 

( B»  LOAO/SAVF  FILE  - KEY  FILE  CONTAINING  RANDOMLY  ACCESSIBLE 

KEYS  SELECTED  FROM  THE  DATA  FILE  AT 
LOADER  TIME. 

UNDFR  FULL  INVERSION  ALL  DATA  IS  'INVERTED',  OR  MADE  RANDOMLY 
ACCESSIBLE.  THE  FULLY  INVERTED  MARS  VI  FILE  IS  NOT  USABLE  WITH  EOPTRAN 
OP  CC9CL,  SINCE  TT  IS  A FILE  OF  KEYS  AND  BEARS  NO  RESEMBLANCE  TQ  THE 
ORIGINAL  DATA  FILE.  IN  ADDITION,  SINCE  ALL  ITFMS  ARE  INVERTED,  THIS 
FILE  FORM  RFQUTRFS  MANY  MORE  PRU'S  FOR  STORAGE.  THIS  FULLY  INVERTED 
FORMAT  SHOULD  RE  AVOIDED  IF  POSSIBLE.  IT  HAS,  HOWEVER  ONE  AOVANTAGEI 
IT  CAN  CPFRATF  qN  VAPTAPLE  LENGTH  INPUT  RECORDS  AND  ON  A VARIABLE 
NUMBER  OF  LOWER  LEVELS  IN  A HIERARCHIC  STRUCTURE. 


MAPS  VI  EXECUTION 

SINCF  maps  is  a oiJBLIC- ACCESS  PERMANENT  FILE,  THE  FOLLOWING  CONTROL 
CARD  IS  PFOUIOEDt 

A TTACH,MAPS. 

thf  first  user  directive  to  maps  must  BEJ 
USFRLIB  IS  maps: 


i 


J 
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MAPS  VI  CPFATION  CONCEPTS 

MARS  VT  (90TH  FULL  AND  PARTIAL  TNVFPSION)  HAS  THREE  MAJOR  MODULES. 
(1)  DFFINP 

(P)  LOADER  (PARTIAL  INVERSION)  INVERTER  (FULL  INVERSION) 

M)  RETRIEVAL 

MA»S  REQUIRES  THAT  AN  INITIAL  DATA  FILE  BE  DEFINED,  PASSED  BY 
PITHFR  the  loaded  OR  INVERTER  IN  ORDER  TO  CREATE  A RETRIEVAL  FILE. 

IN  THR  CASE  OR  PARTIAL  INVERSION  A RECORD  FILE  IS  ALSO  GENERATED  WHICH 
CAN  EE  ACCESSED  SEQUENTIALLY.  ALL  FIELDS  PRESENT  ON  THE  INITIAL  DATA 
FILE  WILL  BE  ON  THE  RECORD  FILE,  INCLUDING  KEY  ITEMS.  KEY  ITEMS 
MILL  ALSO  BE  ON  THE  LOAD/SAVE  FILE  (RANDOM  FILE).  HENCE,  IT  IS 
IMPORTANT  THAT  ITEMS  BE  NAMED  KEYS  ONLY  IF  THEY  WILL  BE  ACCESSEL 

frequently. 

there  is  no  need  to  catalog  O'?  USR  MARS  (PF)  SINCE  LOAD  DATA  BASE 
ON  LFN  creates  A COPY  OF  YOUR  RANDOM  KEY  FILE.  IN  ADDITION  ONLY  ONE 
PERMANENT  FILE  IS  USED  INSTEAD  OF  EIGHT.  THE  USE  OF  THE  LOAO/SAVE 
FILE  WILL  SAVE  SYSTEM  RRU'S  SINCE  EIGHT  PE*S  REQUIRE  «*56  PR'J'S  TO  BE 
allocated  by  THE  SYSTEM,  EVEN  IF  ONLY  ? OR  1 ARE  ACTUALLY  USED  IN  EACH. 


MARS  VI  RETRIEVAL  CONCEPTS 

UNDER  VI,  ALWAYS  USE  TME  SAME  INFORMATION  WHEN  REFERENCING  THE 

RFrOPD  FILE,  I.  E.,  'RECORD  FILE  LFN;».  THE  INFORMATION  TO  BE  USED  IS 
IS  THE  name  given  THE  FILE  AT  LOAD  TIME. 

MARS  IV  CAN  GENERATE  SEQUENTIAL  FILES  WITH  PART  OF  THE  DATA  FROM 
the  original  file  via  the  report  file  is  LFN;  and  the  SUBSET  VERB. 

THE  FTLF  generated  BY  MARS  CAN  BE  READ  BY  COBOL  WITH  RECORDING  MODE 
DECIMAL  OR  BY  FORTRAN  WITH  FORMATTED  READ  STATEMENTS.  IE  MORE  THAN  150 
CHARACTERS  PER  R>^CnRD,  AN  ADDITIONAL  PARAMETER  MUST  BE  USED  ON  THE  ETN 
PPOGRA-  CARD.  IE  DATA  IS  BUEFERFO  IN,  ARRAY  SHOULD  BE  512  WORDS  AND 
DFRLCCKING  MUST  BE  DONE  9Y  THE  USER. 
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»»»  MARS  VI  SAMPLF  JOS  STPFAMS 
TRPATF  A PARTIAL  INVERSION  FILE 


USFPMAR,CMGOmO,T100Q,P3, 
fHARr.r,  USFR  , JJJJJJJJJJ. 
ATTArH,INFILP,in=USFR. 
PFOUEST,SnATA,*PF. 

pfoupst,ppcftlp,*pf. 

ATTArw,MARS. 

MARS. 

rATALOG,SnATA,TD=USPR,XR=PnONL. 
CATALOG,RFCFILP,in=USFR, XR=POONL. 
• 7/8/q  FOP 

L'GFRLIS  IS  mars; 
fffinf; 

NFW  OATA  PASE  IS  TEST; 

1 ) PFRSON(NAME) ; 

?)  sodf(namf); 
map; 

OFFINE  SURITFMI 

PFCOPO  ID  IS  testa; 

rCL  l-?0,  Cl»  PERSON, key; 

rOL  21-?6,C?,C0DF,  key; 


NAME  / CODE 

INPUT  DATA  file 
DATA  BASE  FILE 
RECORD  FILE 


rCL  ?7-37,  address; 

COL  3»?-40,,  data.num; 

ENT  definition; 
loader; 

DATA  FILE  IS  INFILE;  IF  COBOL-GENERATED  USE  "I NFILE, C B ; “ 

RECORD  FILE  IS  RECFILF*, 
scan  testa; 

favf  data  base  on  sdata; 
exit; 

f-/7/f\/0  FOE 


RETRIEVE  FROM  EXISTING  FILE 

USERMAP,rM6,00'10,TE00.  NAME  / CODE 

CHARGE, USER, JIJJJJJJJJ. 

ATTAFH, RECFTLF, ID=USER. 

ATTACH, SDATA, I D=USFP. 

PFOUFST ,Tfmp,*PF. 

A TTACH, MARS. 

MARS. 

r ATALOG, TFmp,OUTPUTFTLE, I D=USFR,XR=KEEP. 

• 7/8/q  for 

USFRLIB  IS  haRS; 

LOAD  DATA  BASF  FPOM  SDATA; 

retrieval; 

PFCOPO  file  is  pecfilf; 

IF  DATA  ED  10  PRINT  PERSON; 

OEFORT  file  TS  TEmp; 

IF  data  I.T  F SUBSET  PERSON,  CODE;  ) 

pefopt  FILE  IS  output; 

REPORT  PERSON  WHERE  DATA  EXIST; 

exit;  I 

••  F/7/fl/q  FOE 


JUNE  1977 


PAGE  11-11 


NASTPflN 

NASTRftN  IS  A GENERAL  PURPOSE  FINITE  ELEMENT  STRUCTURAL  ANALYSIS 
PROGRAM,  CAPABLE  OF  PERFORMING  A WIDE  RANGE  OF  ANALYSIS  ON  MODELS  OF 
COMPLEX  STRUCTURES.  SOME  OF  THE  CAPABILITIES  OF  NASTRAN  INCLUDE 
STATIC  STRESS  ANALYSTS,  NATURAL  FREQUENCY  ANALYSIS,  BUCKLING  ANALYSIS, 
FREQUENCY  RESPONSE  ANALYSIS  AND  TRANSIENT  RESPONSE  ANALYSIS. 

THE  VERSION  OF  NASTRAN  CURRENTLY  STORED  ON  SYSTEM  PERMANENT 
FILES  IS  LEVEL  16.0.  THE  PREVIOUS  LEVEL  (15.2  - NAVY-NAS TRAN)  IS  ONLY 
AVAILABLE  ON  THE  6400  AS  CYCLE  1. 

EXECUTION  OF  THE  PROGRAM  MAY  BE  INVOKED  BY  THE  FOLLOWING  SEQUENCE 
OF  CONTROL  CARDSI 

JOP  CARO  WITH  CM, 

CHARGE, . . .. 

VSN,..  .. 

LABEL, NPTP,0=HI,.... 

LAREL,OPTP,0=HI,R, . .. . 

REQUEST, PLT2, HI, S. 

MAP,CEF. 

ATTACH, NASTRAN. 

RFL,NNNNNN. 

NASTRAN. ATTACH 
» 7/8/9  EOR 

(DATA  CAROS) 

“ e/7/8/9  EOF 


THE  PROGRAM  REQUIRES  A MIMIMUM  OF  140000  OCTAL  OF  CENTRAL  MEMORY. 
HOWEVER,  MEMORY  REQUESTS  SHOULD  BE  ADJUSTED  TO  PROBLEM  SIZE  FOR 
EFPICIENT  SOLUTION.  ADDITIONAL  INFORMATION  ON  THE  NASTRAN 
PROGRAM  AND  RELATED  PROGRAMS  IS  AVAILABLE  FROM  THE  NUMERICAL  STRUCTURAL 
MECHANICS  BRANCH,  CODE  1844,  TELE.  227-1938  OR  227-1660. 

BANDIT  ALSO  REQUIRES  REL. 


MT,  T SET  AS  NEEDED  FOR,  SIZE  OF  DATA 

AS  NEEDED  FOR  TAPES 
OPTIONAL-EOR  RUNS  WITH  CHKPNT  YES 
OPTIONAL-FOR  RESTARTS 
OPTIONAL-EOR  PLOTTING 


NNNNNN  IS  JOB  CAPO  CM 


I 

I 
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•••  MIMIC  ••• 

MIMIC  IS  A DIGIT  AL/ANALOr,  SIMULATION  LANGUAGF  FOR  SOLVING  SYSTFMS 
OF  CROTNARY  DIFFFRFNTIAL  FQUATIONS.  MIMIC,  A CONTINUOUS  SYSTEM 
SIMULATOR,  IS  A PARALLEL  LANGUAGE  SINCE  THE  STATEMENTS  DEFINING  A 
PROGRAM  MAY  BE  WRITTEN  IN  ANY  ORDER.  THE  ORIGINAL  LANGUAGE  WAS 
DEVELOPED  BY  THE  AIR  FORCE.  TO  USEt 
ATTACH, MIMIC. 

MIMIC. 

PFRT  ♦♦♦ 

PROGRAM  EVALUATION  AND  REVIEW  TECHNIQUE  (PERT)  MAY  BE  USED  TO  PLAN, 
MONITOR  AND  EVALUATE  PROJECTS  AND  PROGRAMS.  PERT/TIME  PROVIDES  PROJECT 
CONTROL  FROM  THE  STANDPOINT  OF  TIMF.  TO  USEl 
ATTACH,PERT66,PERTTIME. 

RFL, 120000. 

PERT6B. 

PERT/COST  PROVIDES  EFFECTIVE  PROJECT  COST  CONTROL.  TO  USE: 

ATTACH, PERTC. 

RFL, 112000. 

PERTC. 


QWICK  QWEPY  (PROPRIETARY) 

THE  QWICK  QWERY  SYSTEM  CAN  PROVIDE  THE  USER  WITH  AN  ANALYSIS  OF 
ANY  FILE  (BINARY  OR  CODED)  ON  THE  CDC  GOOO.  A FILE  MAY  BE  STORED  ON 
TAPE,  DEVICE  SET  PACK,  OR  ON  A PERMANENT  FILE.  THE  USER  SETS  UP  A 
DICTIONARY  WHICH  RELATES  AN  ATTRIBUTE  NAME  USED  BY  OWICK  OWERY  TO 
SPECIFIC  WORDS  OR  CHARACTERS  ON  THE  FILE.  THEN  THE  USER  CAN  QUERY  THE 
FILE  AND  OBTAIN  INFORMATION  ABOUT  SPECIFIC  ATTRIBUTES.  ONE  EXAMPLE 
WOULD  BE  TO  PROVIDE  THE  NAMES  AND  JOB  DESCRIPTIONS  OF  ALL  PERSONNEL 
EMPLOYED  OVER  THE  PAST  TEN  YEARS.  THIS  INFORMATION  COULD  BE  LISTED 
SEPARATELY  FOR  EACH  DIVISION,  WITH  THE  PERSON  WITH  THE  LONGEST  TENURE 
LISTED  EIRST.  THE  USER  COULD  SEARCH  AN  OUTPUT  FILE  FROM  AN  ANALYSIS 
PROGRAM  TO  PRINT  THF  RESULTS  FROM  RUNS  THAT  MEET  CERTAIN  CRITERIA. 

REFERENCE  MANUAL  - A QUICK  LOOK  AT  QWICK  QWERY 

ASSISTANCE  WITH  INTERFACING  FILES  - LORRAINE  MINOR,  CODE  1BB2.3 

CLARENCE  PERRY,  CODE  1822 


RIQS  (PROPRIETARY) 

REMOTE  INFORMATION  QUERY  SYSTEM  (RIQS),  WRITTEN  AT  NORTHWESTERN 
university,  INCLUDES  FACILIflES  FOR  FILE  CREATION,  LIMITED  RETRIEVAL, 
SEARCH  AND  UPDATE  OF  A DATA  BASF.  THE  RIQS  SYSTEM  CAN  CREATE  A BATA 
BASE  OF  LIKE-STRUCTURED  RECORDS  OF  MEDIUM  SIZE.  NUMERICAL  CALCULATIONS 
CAN  PE  PERFORMED  ON  RECORDS.  PRINTED  REPORTS  AND  INDEXES  CAN  BE 
GENERATED.  RIQS  OFFERS  SOME  CAPABILITIES  AVAILABLE  IN  MARS  VI. 

RIQSONLINF  IS  A COMPANION  SYSTEM  FOR  USE  FROM  AN  INTERACTIVE 

terminal  and  allows  file  searching,  SPSS  file  creation,  and  SIMPLE 
PRINTER  PLOT  GENERATION. 

RIQS  MAS  OBTAINED  BY  ONE  OF  OUR  CUSTOMERS  (THE  CONSTRUCTION 
ENGINEERING  RESEARCH  LABORATORY  (CEPL),  COMPUTER  SCIENCES  BRANCH). 
QUESTIONS  AND  COMMENTS  SHOULD  BE  DIRECTED  TO  USER  SERVICES. 
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•**  SHAPP  DATA  RA9F  MANAGEMENT  SYSTEM  **• 

SHARP,  SHIPS  ANALYSTS  AND  RETRIEVAL  PROGRAM,  IS  A GENERALIZED  DATA 
rase  management  system  (omsj  developed  at  the  naval  ship  research  and 
development  center  (DTNSRDC),  CAPDEPOCK,  MARYLAND.  SHARP  IS  ON  THE  CDC 
66P0  COMPUTER  UNDER  NOS/BF  1.0  AND  INTERCOM,  WHICH  PROVIDES  TIME- 
SHARING ACCESS  TO  THE  SYSTEM.  THE  COMRADE  MONITOR  IS  USED  TO  CONTROL 
THE  EXECUTION  OE  SHARP. 

SHARP  IS  A SELE-CONTAINED  QMS,  DESIGNED  TO  ALLOW  NON- TECHNI CAL 
PERSCNP  TO  DFEINP,  PUILD,  MAINTAIN,  AND  INTERROGATE  DATA  RASES  WITHOUT 
REOUTRTNG  APPLICATION  PROGRAM  INTERFACES.  SHARP  ALLOWS  ON-LINE  AND 
OFF-LINE  ACCESS  TO  DATA  BASES.  USFP-ORIENTEO,  ENGLISH-LKE  LANGUAGE 
IS  USER  ECP  ROTH  RETRIEVAL  AND  REPORT  GENERATION  AND  IS  HIGHLY  SUITED 
FOR  INTERACTIVE  USE  PROM  REMOTE  TERMINALS.  APPLICATION  PROGRAM 
TNTEREACES  are  available  IE  NFEPED  FOP  USER  PROGRAMS  TO  ACCESS  DATA  IN 
THE  data  rase  and  FOR  GENERATING  SPECIAL  RERORTS  ON  DATA  RETRIEVED 
DUPING  A SHARP  interrogation  PE  THE  DATA  RASE. 

CURRENT  data  BASE  APPLICATIONS  UNDER  THE  SHARP  DMS  INCLJOEl 
. TECHNICAL  DOCUMENT  (BIBLIOGRAPHIC) 

. SHIP  OVERHAUL  EXPERIENCE 
. SHIP  OPFPATING  EXPERIENCE 
. COMPUTER  center  expense  ACCOUNTING 
. LIRPARY  CIRCULATION 
. SYSTEM  software  ACCOUNTING 

. OCrAN  SCICNCF  RESEARCH  PROJECT  INEORMA’^ION 

THt^  MAJOR  EEATUPES  OF  SHARP  INCLUOEt 

. Generalized  data  base  deeinttion 

. GENERALIZED  US EP-QP lEN TF D FORMAT  CHECK  CAPABILITY 
. PARTIALLY  TNVF°TCn  FILE  STRUCTURE 

. variable  length  and  variable  data  record  structure 
. ability  to  change  data  base  deeinttion  without  rebuilding 
data  base 

. ON-LINE  file  maintenance  WITH  FREE  FORM  DIRECT  ENTRY 
capability 

. endlISH-LTKE,  uSFP-OPTENTED  language  for  query  commands 
REPORT  definitions,  AND  FORMAT  CHECKING 
. interactive  pppoRT  DfETNITTON  WITH  ABILITY  TO  CATALOG 
OEETnED  REPORTS  FOR  FUTURE  SELECTION 
. ON-LINE  interact TVE  AND  BATCH  RETRIEVAL 
. on-line  AO  HOC  COMPUTATION  CAPABILITY 
. HOST  language  interface 

. MULTI-LEVEL  SORT  RAPABTLITY 

<^HAPP  has  developed  in  COBOL  TO  FACILITATE  MODIFICATION  AND 
CONVEREIOM  TO  other  COMPUTERS.  IN  AOOITION  tq  THE  CDC  6000,  HARP  IS 
OPERATTONAI  on  the  UNIVAC  series.  70/96  COMPUTER  SYSTEMS  AT  DPSCkAC,  SAN 

niECc  ano  orsclant,  Norfolk,  the  system  is  being  converteo  to  ibm 
SVS Teu/t70/h;s  and  BUPROUGHS  4700  COMPUTER  SYSTEMS. 


PCFROCNCE  manual  sharp  DATA  BASE  MANAGEMENT  SYSTEM 

USER  T*''ECPMATTDN  MANUAL  TM-I80-76-1 

FOR  assistance  r:ONTACT  BEN  WALLIS,  CODE  10??,  (?0?)  ??7-lS31 
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»*•  SORT/MERGE  9.0 

SOPT/MERGE  19  A FLEXIBLE  SYSTEM  ROUTINE  FOR  SEQUENCING  AND 
COMBINING  FILFS.  IN  ADDITICN  TO  THE  USUAL  ALPHANUMERIC  FIELDS,  SORT 
MAY  be  on  floating-point,  FIXED-POINT  (INTEGER)  AND  LOGICAL  TYPE 
FIELDS.  A USER  OPTION  ALLOWS  CHANGE  OF  SORT  SEQUENCE. 

THE  sort/merge  SYSTEM  HAY  BE  CALLED  DIRECTLY  AS  A STAND-ALONE 
SYSTFM  WITH  CONTROL  CARDS  TO  ESTABLISH  FILES  AND  SORT  FIELDS.  IN 
COBOL,  THE  SORT  VERB  USES  THE  SYSTFM  AS  A SUBROUTINE.  FORTRAN  HAS  A 
SET  OF  SUBROUTINES  WHICH  MAY  BE  USED  TO  CALL  SORT/MEPGE  WITHIN  AN  F TN 
program. 

guidelines  for  use  of  CONTROL  CARD  VERSION  OF  SORT/MERGEl 

1.  THE  SORTMRG  CONTROL  CARD  HAS  OPTIONS  FOR  REWINDING  THE  DIRECTIVE 
AND  LIST  FILES.  REWIND  ALL  OTHER  FILES  CONCERNED  IN  THE  SORT  (UNLESS 
SPECIAL  POSITIONING  OF  AN  EXISTING  FILE  IS  NEEDED)  BEFORE  SORTING. 

2.  SORT/MERGE  USES  RECORD  MANAGER  AS  ITS  INPUT/OUTPUT  PROCESSOR. 
FILE  CAPOS  ARE  REQUIRED  FOR  ALL  FILES  TO  BE  SORTED  OR  MERGED  AND  FOR 
THE  PE’^ULTING  OUTPUT  FILE. 

3.  INPUT  IS  A VALID  FILE  FOR  SORT  INPUT.  THE  SPECIAL  SYSTEM  FILES 
INPUT,  OUTPUT  AND  PUNCH  DO  NOT  REQUIRE  FILE  CONTROL  CARDS.  THEY  ALWAYS 
Have  DEFAULT  BT=C  ANO  RT=7. 

9.  OUTPUT  IS  A VALID  FILE  FOR  SORT  OUTPUT.  THE  FIRST  CHARACTER 
EACH  RECORD  IS  USED  FOR  CARRIAGE  CONTROL. 

S.  IE  NO  INPUT  FILE  CARD  IS  SUPPLIED,  THE  USER  MUST  SPECIFY  AN 
EXIT  1 ON  THE  “OWNCOOE"  OTPECTIVE  ANO  PROVIDE  A ROUTINE  TO  READ  THE 
INPUT  RECORDS. 

fi.  IF  SORT/MERGF  DIRECTIVE  CARDS  ARE  NOT  IN  THE  INPUT  STREAM,  BUT 
ARE  ALREADY  STORED  AS  UNIT  RECORDS  ON  FILE  "ABC",  USE  SORTHRG ( 1= ABC) 

OR  SORTMRGCI=ABC/R)  TO  INDICATE  THE  SOURCE  OF  THE  SORT  DIRECTIVES. 
(THE  SECOND  FORM  WILL  REWIND  "ABC"  BEFORE  READING  THE  DIRECTIVES.)  IF 
THF  DIRECTIVES  ARE  ON  THE  UPDATE  "COMPILE"  FILE,  USE  SORTMRG(I)  OR 
SORT)<RG(I/R»  . 

7.  JOB  CARO  CM  SHOULD  BE  AT  LEAST  12000  OCTAL  MORE  THAN  IS  NEEDED 
TO  RUN  THE  COBOL  OR  FTN  PROGRAM  WHICH  USES  SORT/MERGE  INTERNALLY. 

8.  SOPT/MERGE  3.0  DIRECTIVES  ARE  ACCEPTED  IF  THE  PARAMETER  ~6C“  IS 
ADCFC  TO  THE  SORTMRG  CONTROL  CARO  (I.E.,  S0RTHRG(6C)  ).  FILE  CAROS 
ARE  NOT  REQUIRED  WITH  SORT/MEPGE  3.0  CONTROL  CAROS.  THE  VERSION  3.0 
"PFCCPD"  DIRECTIVES  ARE  CONVERTED  INTERNALLY  INTO  CORRESPONDING  RECORD 
MANAGER  FILE  CAROS. 

9.  RECORDS  WITH  IDENTICAL  SORT  KEYS  ARE  SEQUENCED  ARBITRARILY 
UNLESS  THc  "RETAIN"  PARAMETER  IS  ADDED  TO  THE  "OPTIONS"  DTREOlVt. 

WHEN  "RETAIN"  IS  SPECIFIED,  IDENTICAL  KEYS  ARE  SEQUENCED  IN  THE  ORDER 
IN  WHICH  they  were  pEAO. 
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•**  SAMPLE  SORT/MERGE  SETUPS 


1.  SORT  CARO  IMAGE  TAPE  ON  ENOPUNCHING  (COLUMNS  73-80) 

USERST,CMf.0000tMTl.  NAME  / CODE 

CHARGE,USER,JJJJJJJJJJ, 

LAPELtC ARDS, L=USERC ARDS, n=HY»R,VSN=CA 7777, NORING. 

RECUFST, SCRATCH, *PF.  SCRATCH  FILE  ON  DISK 

FILE (CARDS, MRL=80,BT=C,RT=Z) 

FTLE(SCRATCH,MRL=80,8T=C,RT=Z) 

SORTMRG. 

COPYSF(SCRATCH, OUTPUT)  **  LIST  SORTED  FILE 

• 7/8/9  EOR 

SORT 

FILE, INPUT=CARDS(CU),  OUTPUT  = S CRATCH 
FIELO,FNDPCH( 73, 8, DISPLAY ) 

KEY,EN0PCH(A,C0R0L6) 

ENC 

“ 6/7/8Z9  EOF 


2. 


CREATE  AND  SORT  UNIT  RECORDS.  RECORDS  ARE  SORTED 
(ASCENDING)  AND  2-15  (DESCENDING).  NOTE*  SORTING 
CONE  WITHIN  THF  FTN  PROGRAM. 


ON  23-25 
COULD  HAVE  BEEN 


JOBNAME,....  NAME  / CODE 

CHARGE,.... 

FTN. 

LGO. 


FILE(TAPE7, 

MRL=140,BT=C,RT=7) 

FTLE(TAPE9, 

SORTMRG. 

MRL=140,BT=C,RT=Z) 

(OTHER  CONTROL  CARDS  TO  PROCESS 

SORTED 

EILE 

TAPE9) 

• 7/8/9 

FOR 

(FORTRAN 

SOURCE  CREATING  TAPE7 

ON  DISK 

WITH 

FORMATTED 

• 7/8/9 

EOR 

(FORTRAN 

DATA) 

• 7/8/9 

EOR 

SORT 

FILE, INPUT=TAPE7, 0UTPUT=TAPE9 

EIFLn,MAJOR(?3,'«,  DISPLAY)  , MINOR  (2, 15,  DISPLAY) 
KEY.MAJOR ( A,C0R0L6) ,MINOR (D,CDB0L6) 

END 

••  G/7/8/9  EOF 
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7i.  5QPT  USING  SQPT/HEPGE  3.0  DIRECTIVES.  SORT  I/O  FILES  HAVE  40-WORO 
, REGOROS  WITH  1?  RrcORDS  PGR  SLOCK. 


JO^NAMEtMT?,. . . . NAME  / CODE 

CHARGE,. ... 

LAPEL ,OLD,n=HY, L=SORT IN, VSN=CA9999, NORING. 

L APEL ,NGW,D=HY,L=SORTOUT, VSN=CA 9998 , R I NG. 
FTLE(OLD,9T  = K,RT=E,EL  = ‘*00,PP=1?,MBL=48  00) 
EILF(NEW,9T=K,PT  = E,FL  = '*0  0 , RR=  1 ? , MBL  =4  8 0 0 ) 

LDSET  (EILFS=NEW/OLO) 

S0PTM9G(6C) 

• 7/8/9  FOR 

(SORT/MFRGE  7.0  DIRFCTIVFSJ 


6/7Z8/9  EOF 
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***  GPSS  (PR0PRIETA9Y ) 


* • » 


GENERAL  PURPOSE  SIMULATION  SYSTEM  <GPSS>  V,  VERSION  1.?,  IS  A 
generalized  SIMULATION  PACKAGE.  IT  IS  COMPATIBLE  WITH  IBM  SYSTFM/360 
GPSS  V.  TO  USEI 


ATTACH, GPSS. 
GPSS(<PARAMETFRS>) 


OMNITAB  ••• 

k- 

CMNITAB  IT,  OBTAINED  FROM  THE  NATIONAL  BUREAU  OF  STANDARDS,  ENABLES 
THE  NON-PROGRAMMER  TO  USE  A LARGE  DIGITAL  COMPUTER  TO  PERFORM  DATA, 
STATISTICAL  AND  NUMERICAL  ANALYSIS  WITHOUT  HAVING  ANY  PRIOR  KNOWLEDGE 
OF  CCMPUTERS  OR  COMPUTER  PROGRAMMING. 

JOBNAME,CM170000,....  NAME  / CODE 

CHARGE,.... 

ATTACH, OMNITAB. 

OMNITAB. 


•••  PL/I  SUBSET 

PLl,  FROM  THE  COURANT  INSTITUTE  OF  MATHEMATICAL  SCIENCES,  IS  A 
SUPSET  OF  THE  PL/I  LANGUAGE  AND  IS  ORIENTED  TOWARD  COMPILER  WRITING. 
IT  IS  NOT  COMPLETELY  COMPATIBLE  WITH  IBM  IMPLEMENTATIONS. 


SCORE  (PROPRIETARY) 

SCORE  IS  A GENERALIZED  RETRIEVAL  AND  REPORTING  SYSTEM.  IT  IS  A 
COBOL  GENERATOR  AND  PROVIDES  A SOURCE  PROGRAM  LISTING  AS  A BYPRODUCT 
OF  THE  USER  SPECIFICATIONS.  SCORE  CAN  THUS  BE  USED  AS  A REPORT  WRITER, 
file  generator  and/or  a SKELETON  COBOL  PROGRAM  GENERATOR. 
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»**  SPSS  (PPOPRIFTAPY) 

statistical  package  fop  the  social  sciences  (SPSS)  IS  AN  OPEN-ENDED 
TNTrcRATFD  SYSTEM  OF  STATISTICAL  PROG'^AMS  EMBEDDED  IN  A SINGLE  CONTROL 
PPCGRAV.  THF  CDC  GOnO  VERSION  WAS  OBTAINED  FROM  NOR  TH  HE'S  TERN  UNIVERSITY 
AND  IS  MAINTAINED  BY  DNF  OF  OUR  CUSTOMERS  (THE  CONSTRUCTION  ENGINEERING 
RESEARCH  LABOPATOPY  (CERL),  COMPUTER  SERVICES  BRANCH).  SPSS  IS  A BATCH 
SYSTEM  WRITTEN  MOSTLY  IN  FORTRAN.  THIS  PACKAGE  (VERSION  6)  IS  MORE 
VERSATILE  THAN  THE  RIMED  ROUTINES  (CCRM,  10-19),  SINCE  MANY  DIEEE»ENT 
STATISTICS  CAN  BE  PFRFOPMED  ON  THE  SAME  DATA  IN  ONE  RUN.  FOP  LARGER 
AMCUNTF  OF  DATA,  CM140000  SHOULD  BF  SPECIFIED  ON  THE  JOB  CARO?  HOWEVER, 
THF  system  hill  REDUCE  CORE  TO  THE  LOWEST  NEEDED  FOP  EACH  TYPE  OF 
STATISTIC, 

CUBPFNT  PROGRAMS  INCLUDEt 
DESCRIPTIVE  STATISTICS 
CROSS  TABULATION 

PFARSON  AND  RANK  ORDEP  CORPELATION 
PARTIAL  correlation 
MULTIPLE  REGRESSION  ANALYSIS 
NON-LINEAP  REGRESSION  ANALYSIS 
GUTTMAM  SCALE  ANALYSIS 

factor  analysis 

CANONICAL  CORPELATION 
BIVARIATE  printer  PLOTTING 
T-TEST 

ONE-WAY  ANALYSTS  OF  VARIANCE 
N-WAY  ANALYSIS  OF  VARIANCE 
DISCRIMINANT  ANALYSIS 

nonparametrtc  statistical  tests 

ITEM  AND  scale  RELIABILITY  ANALYSIS 
TFTPACHORIC  CORRELATIONS 


example 


XXXXYYY,CM70000.  NAME /CODE 

CHARGF,XXXX, JJJJJJJJJJ. 

• • • 

ATTACH, SPSS. 

SPSS (<PARAM>)  ••  PAPAM  IS  OPTIONAL  PARAMETERS  AS  DESCRIBED  IN 
• 7/B/B  FOR  APPENDIX  F OF  SPSS,  2ND  EDITION 

• • • 

•*  e/z/B/q  EOF 


RFFFPFNCFSt  “SPSS,  SECOND  EDITION",  NIF,  HULL,  JENKINS, 

STFINBRENNFP , RENT 
"SPSS  PPTMEP“,  KLECKA,  NIE,  HULL 
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***  SIMSCRIPT  I.S 

SIMSCRIPT  1.5  IS  A PROGRAMMING  LANGUAGE  TO  SIMULATE  A REAL 
SITUATION  MHICH  CHANGES  OVER  SOME  TIME  INTERVAL.  IT  IS  COMPATIBLE  WITH 
OTHER  SIMSCRIPT  1.5  COMPILERS  AND  INCLUDES  SOME  DATA  PROCESSING 
FEATURES  AND  HAS  ACCESS  TO  FTN  LIBRARY  ROUTINES.  USE  THE  FOLLOWING 
CONTROL  CAROSI 

ATTACH, SI MIS, IO=CSYS. 

SIMI5,<PARAMS>. 

LGO. 


*♦*  SIMSCRIPT  II. 5 

THE  SIMSCRIPT  II. 5 COMPILER,  WHICH  IS  NOT  COMPATIBLE  WITH  SIMSCRIPT 
1.5,  IS  NOW  AVAILABLE. 

ATTACH,SIMII5,in=CSYS. 

SIMII5,<0PTI0NS>. 

ATTACH,SIMBLIB,ID=CSYS. 

LGO. 

SNOBOL 

SNOBOL  IS  A STRING  MANIPULATION  INTERPRETIVE  PROGRAMMING  LANGUAGE 
DESIGNED  TO  OPERATE  UPON  CHARACTER  STRINGS  RATHER  THAN  NUMERICAL  DATA. 
SNCPCL  DOES  ACCEPT  INTEGER  AND  REAL  NUMERIC  OPERATIONS,  HOWEVER 
EXECUTION  TIME  IS  GREATER  THAN  FOR  A COMPILER  SUCH  AS  FORTRAN.  SNOBOL 
PROVIDFS  AN  EXTENSIVE  LIST  OF  FUNCTIONS  TO  OPERATE  UPON  STRINGS. 
PATTERNS  USED  FOR  SUBSTRING  MATCHING  MAY  BE  SIMPLE  OR  COMPLICATED. 
SNOBOL  IS  A PUBLIC-ACCESS  PERMANENT  FILE. 


DETAILED  DESCRIPTION  OE  SNOBOL  IS  IN 
LANGUAGE"  BY  R.  E.  GRISWOLD. 


‘THE  SNOBOL**  programming 


SYSTEM  ?000 


(P»0°RIFT  ARY) 


SYSTEM  2000  IS  A DATA  BASE  MANAGEMENT  SYSTEM  AVAIlARLf  TO  ALL  NAVY 
USERS  OE  THE  DTNSRDC  5000  COMPUTERS.  THE  BASIC  NATURAL  LANGUAGE  IS 
SUITABLE  FOR  INTERACTIVE  USE.  A PROCEDURAL  LANGUAG*  EVA  TUP'"  ALLOWS 
MANIPULATION  OE  SYSTEM  2000  DATA  BASES  FROM  COBOL  OP  fQRTRAN  PROGRAMS. 


PROCEDURE 
CCLIB/P) . 


'S2000*  MUST  BE  USED  TO  ACCESS  THE  SYSTEM  ?n00  FILES  (SEE 
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*•*  VENUS 


VENUS,  VEPSION  3,0,  IS  A RETRIEVAL  SYSTEM  DESIGNED  FOR  USE  WITH 
INOEXEn  SEQUENTIAL  (FO=IS)  FILES.  IT  OPERATES  IN  THE  INTERACTIVE  OR 
BATCH  MODE.  FEATURES  INCLUOEJ 

.INTERACTIVE  DATA  BASF  DEFINITION  AND  CREATION 

.INTERACTIVE  UPDATE 

.BATCH  MULTI-FILE  CAPABILITY 

.PRINTER  PLOT 

.INTERFACES  TO  USER  PROGRAMS 

.DIRECT  USAGE  OF  VENUS  FILES  BY  HIGHER  LEVEL  LANGUAGES 

.sub-files 

.unlimited  redefinition  of  files 

.TEXT  SCANNING 
.REPORT  WRITER 
.CALCULATOR  MODE 

SOME  OF  THE  FEATURES  fSUCH  AS  PLOT,  REPORT  WRITER)  CAN  BE  USED 
WITHOUT  VENUS. 


VENUS  will  build 
IT  HAS  BEEN  MODIEIED 


INDEXED  SEQUENTIAL  FILES  FROM  SEQUENTIAL  INPUT. 
TO  ALLOW  FOR  RETRIEVAL  FROM  SEQUENTIAL  FILES. 


VENUS  CURRENTLY  REQUIRES  LESS  THAN  CM55000. 


REFERENCES! 


VPNUS  3.0  USER  MANUAL 

VENUS  SUPPORT  PROCESSORS  USER  MANUAL 
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OTHEP  COMPUTEP  CENTER 


EQUIPMENT 


THIS 

HARCWaPE 


CHAPTER  DESCRIBES  OTHER  COMPUTERS 

available. 


AND  COMPUTER-RELATED 


1700  COMPUTER  TERMINALS 

THE  COC-6700  COMPUTER  AT  DTNSpOC  CURRENTLY  HAS  THREE  COC-1700 
COMPUTER  terminals.  THE  CDC-6600  COMPUTER  AT  DTNSRDC  HAS  ONE.  THEY 
PROVIDE  REMOTP/STAND-ALONE  PATCH  PROCESSING.  THESE  TERMINALS  AREt 


0 

D 

N 

N 


REMOTE 

TERMINAL 

CENTRAL 

CESIGMAIIQU- 

CQHBUIEB 

— LQCfillQb 

.COHBUIEE. 

TKSRDC 

SC-1700 

BLDG  1B2 

AD 

6700  (MEA) 

TNSRDC/ANNAP 

1700 

BLDG  100 

AE 

6600  (MFB) 

AVSEC 

SC-1700 

NATIONAL  CENTER 

AE 

6700  (MEA) 

aVATR 

1700 

JEFFERSON  PLAZA 

AG 

6700  (MEA) 

THE  1 700  TERMINALS 


CAN  OPERATE 


IN  ONE 


OE  THREE  MOOESI 


1.  STaND-ALONE*  THE  17Q0  COMPUTER  CAN  COMPILE  AND  RUN 

1700-EORTRAN  OR  1700-ASSEMBLY  JOBS. 

?.  TERMINAL!  B700  OR  6600  REMOTE  PROCESSING. 

3.  STAND-ALONE/TERmINALI  can  OPERATE  ASYNCHRONOUSLY  PROVIDING! 

(A)  COPE  IS  AVAILABLE  FOR  LOCAL  JOBS; 

(B)  NO  I/O  DEVICE  IS  BEING  SHARED  BETWEEN  THE  TWO  MODES 
OE  OPERATION. 


1.  PEMOTE/BTAND- ALONP  JOB  PPOCFSSING  ALL 

2.  IGS  (GRAPHICS  PROCESSING)  AD,AF,AG 

T.  PAPER  TAPE  (STAND-ALONE/PFMOTE)  aD,AE,AF 

4.  CALCOMP  plotter  (STAND-ALCNE/PEMOTE)  AF.AG 

E.  card  LTETTNGS,  card  DUPLICATION ALL 


DISECS£L_QE-D«Ifl_IQ-fi_lZHQ-ES2M_ 

GEyiBfiL-SlIE 

(SEE  CCRM 

DT‘^FCSE,LFN,X=II0. 

OR 

ROUTE, LEN,OC=y,TID= TO, FTD=*. 

FOR 

immediate  routing 

RnUTE,LEN,DC=y,TIO=TD,ETD=*,DFF. 

E OR 

ROUTING 

AT  end  of 

1^75 


PftGE 


12-2 


♦ ** 


1700  PEFERFNCF  MANUALS 


THF  following  CDC  MANUALS  ARE  USFFUL  FOR  APPLICATION 


WSOS  VERSION  4 RFFFPFNCF 

(1700  STAND  ALONE  OPERATING  SYSTEM! 

1700  MsnS  IMPORT  HIGH  SPEED 

(6000/1700  REMOTE  OPERATING  PROCEDURE  DESCRIPTION) 


MS  FORTRAN  VERSION  3A/B  REFERENCE  MANUAL 
(1700  FORTRAN) 

1700  COMPUTER  REFERENCE  MANUAL 

(CHARACTERISTICS,  OPERATION  AND  CAPABILITIES  OF  THE 
1700  COMPUTER) 


1700  MSOS  4 MACRO  ASSEMBLER  REFERENCE  MANUAL 
(SYMBOLIC  LANGUAGE) 

1700  MSOS  4 MACRO  ASSEMBLER  GENERAL  INFORMATION 


PROGRAMMERS) 
PUB. NO 
60361500  E 

60305700  A 

60362000  0 

60153100 

60361900  C 
39519800  B 
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200  USER  TERMINAL 

► EniUM  SPEED  TEPMINAI  S (ASCII  OR  BCD)  OPERATE  UNDER  THE  CONTROL  OF 
INTERCOM  AND  CONSIST  OF  A CARD  READER,  A LINE  PRINTER  AND  USUALLY  A CRT 
DISPLAY.  THE  COC  200  USER  TERMINAL  (20Q-UTJ  CAN  BE  CONNECTED  DIRECTLY 
TO  THE  6000  COMPUTERS.  A NUMBER  OF  OTHER  TERMINALS  (INCLUDING  MOHAWK, 
CDC  734  AND  DATA  100)  HAVE  SOFTWARE  PACKAGES  (ROTH  ASCII  AND  BCD)  WHICH 
EMULATE  THE  200-UT.  ONE  OF  THE  200-UT»S  (TERMINAL  ID  AB,  IN  ANNAPOLIS) 
IS  HARDWIRED  TO  THE  6700.  ALL  OTHERS,  INCLUDING  2 0 0-UT-E QUI V AL ENTS , 

ARE  DIAL-UP.  BOTH  2000  AND  4R00  BAUD  TELEPHONE  LINES  ARE  AVAILABLE 
(SEE  CCRM,  1-1,2). 

A SET  OE  REMOTE  BATCH  PROCESSING  COMMANDS  (CCRM,  12-4)  ALLOWS  FOR 
REAPING  AND  PRINTING  FILES.  PRINT  FILES  MAY  BE  ROUTED  TO  A 200-UT  FROM 
BATCH  JOBS  OR  TTY.  200-UT  OPERATORS  MAY  ALTER  PRIORITY,  DIVERT  OR  DROP 
JOBS  IN  THEIR  QUEUES. 


WHEN  READING  CAPOS,  A SWITCH  ON  THE  200-UT  IS  SET  TO  INDICATE  026 
OR  029  PUNCH  MOOE.  THEREFORE,  THE  ENTIRE  DECK  MUST  BE  PUNCHED  IN  ONLY 
ONE  MODE.  NO  BINARY  CARDS  CAN  BE  READ.  SINCE  THE  200-UT  DOES  NOT  HAVE 
A CAPO  PUNCH,  users  WHO  WISH  TO  PUNCH  CAROS  MUST  ROUTE  THEM  TO  CENTRAL 
SITE  OR  TO  A 1700. 


WHEN  PRINTING,  THE  ONLY  CARRIAGE  CONTROL  CHARACTERS  EFFECTIVE  AT  A 


200-UT  are: 
RL  ANK 
1 
0 

+ 


PM 

ALL  CTHERS 


APE 


SINGLE  SPACE  BEFORE  PRINTING 
EJECT  TO  TOP  OF  PAGE  BEFORE  PRINTING 
DOUBLE  SPACE  BEFORE  PRINTING 
SUPPRESS  SPACING  BEFORE  PRINTING 
(PRINT  ON  SAME  LINE) 

PRINTER  MESSAGE 
TREATED  AS  PLANKS. 


THE  200-UT  MAY  BE  USED  ON  LOCAL  FOR  CARD  LISTING. 


AT  4A00  BAUD,  A 200-UT  WILL  R^AD  ABOUT  300  CARDS  PER  MINUTE  AND 
PRINT  ABOUT  300  LIN^S  PER  MINUTE.  THEREFORE,  CARO  DECKS  SHOULD  BE 
LIPTTPp  TO  ONE  BOX  AND  PRINTING  TO  SO  PAGES. 


NOVA  AGO 


THE  NOVA  AOO  IS  A PROGRAMMABLE  TERMINAL  WHICH 
700-UT  pmuLATOP  FOR  MEDIUM  SPEED  BATCH  ACCESS  TO 

200-UT  EMULATOR  IS  LOADED  FROM  A 9 


BCD  LINES.  The 
(PT01/200UT). 


MAY  BE  USED  AS 
COC  6000  ON  2000 
TRACK  TAPE 


BAUD 
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***  PFMOTF  BATCH  PPQCFSSING  - MEDIUM  SPi^FD 
TMF  PCLLOWING  COMMANDS  APF  AVATLAr>LE  AT  A MFDIUM  SPEED  ?00-UT- 

comfattblp  tfpminal  for  processing  batch  jobs  and  output  files. 


PRINTFR 


ON,LPl 

ON 


TURN  THE  LINR  PRINTFR  ON.  MUST  BF  THE  FIRST  COMMAND  AFTER 
LOGIN. 


off,lpi  turn  the  printer  logically  off.  on,lpi  is  reouired  before 

HFF  PRINTING  MAY  RESUME. 


END  ,LP1 
F,  LPl 
END 

F 


END  PRINTING.  DISCARD  THF  REMAINING  OUTPUT.  GO, LPl  TO 
PRINT  THE  JOB'S  DAVFILF.  IGNORE  RFPEAT  COUNT,  IF  ANY.  A 
SECOND  END, LPl  WILL  STOP  PRINTING  THF  OAYFILE. 


GO, LPl 
G , L P 1 
GO 
G 


RESUME  PRINTING  AFTER  WAIT  OR  SOME  ERROR  CONDITIONS. 


CONTIN 

n 


RESUME  PRINTING  WHEN  TRANSMISSION  WAS  STOPPED  BECAUSE  A 
MESSAGE  WAS  RECEIVED  « AND  IS  DISPLAYED  ON  THE  CRT)  OR  THE 
INTERRUPT  key  'INTER*  WAS  PRESSED. 


BSP  ,LP1 ,N 
BSP, ,N 
BSP 


BACKSPACE  LINE  PRINTER  N (TIMES  10  OCTAL)  SECTORS. 
(DEFAULT:  1 (10  OCTAL  SECTORS)) 


RFP,LP1,M  REPRINT  M (OCTAL)  ADDITIONAL  COPIES  (OEFAULTI  11  MAX:  37 
RPP,,M  OCTAL).  THE  REPEAT  COUNT  (RC)  IS  CUMULATIVE  (I.E.,  RFP,,? 

RPP  FOLLOWED  BY  REP, ,3  IS  THE  EQUIVALENT  OF  REP, ,5).  M MAY 

NOT  BF  NEGATIVE. 

REW,LP1  REWIND  THE  PRINT  FILE  AND  TURN  PRINTER  LOGICALLY  OFF. 

RPW  ON, LPl  IS  REQUIRED  BEFORE  PRINTING  MAY  RESUME.  THE 

RESIDUAL  RFPEAT  COUNT  IS  SAVED. 

RTN,LP1  rewind  THE  PRINT  FILE  AND  RETURN  IT  TO  THE  OUTPUT  QUEUE. 

pTN  the  residual  repeat  COUNT  IS  SAVED. 


WA IT,LP1 
WAIT 


TEMPORARILY  HALT  PRINTING. 


TO  RESUME,  USE  GO, LPl. 
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CARO  RFAOFR 

ON.CRl  TURN  CARO  READFR  ON. 

OFF.CRl  TURN  CARO  RFAOFR  LOGICALLY  OFF. 

RFADING  MAY  RFSUMF. 


ON,CRl  IS  REQUIRFD  BEFORE 


FNO.CRl 

F,  CRl 

GO,  CPI 

G,  CRl 

CONTIN 

C 


PNO  CARO  RFAOINF,. 


resume  CARO  reading  AFTER  WAIT  OR  SOME  ERROR  CONDITIONS. 


RESUME  READING  WHEN  TRANSMISSION  WAS  STO°PEO  BECAUSE  A 
MESSAGE  WAS  RECEIVED  ( ANO  IS  OISPLAYED  ON  THE  CRT)  OP  THE 
INTERRUPT  KEY  'INTER'  WAS  PRESSED. 


RE  AD 
R 


READ  CAROS  INTO  THE  INPUT  FILE  FOR  THIS  TERMINAL. 


WATT, CRl 


TEMPOPAPILY  HALT  CARD  READING.  TO  RESUME,  USE  GO, CRl. 


PRINTER  ANO  CAPO  READER 

WATT, ALL  TEMPORARILY  HALT  READING  AND  PRINTING.  TO  RESUME,  USE  GO. 

GO, ALL  RESUME  RFADING  AND/OR  PRINTING  WHICH  WAS  HALTED  BY  WAIT. 

G.ALL  ALSO  REQUIRED,  WITH  OR  WITHOUT  EQUIPMENT,  WHEN  ANY  OF  THE 

FOLLOWING  ERRORS  HAVP  OCCURREDI 
DEVICE  NOT  READY 
JOB  STATEMENT  ERROR 
INPUT  file  error 
OUTPUT  FILE  ERROR 


CONTIN  RPSUME  RFADING  AND/OR  PRINTING  WHEN  TRANSMISSION  WAS 

C stopped  because  a MESSAGE  WAS  RECEIVED  (ANO  IS  DISPLAYED 

ON  THE  CRT)  OP  THE  INTERRUPT  KEY  'INTER'  WAS  PRESSED. 


H,  I 
H,0 
H,F 
H,E 
H,0 


QUEUE  AND  STATUS  DISPLAYS 

DISPLAY  INPUT  QUEUE  FOP  THIS  TERMINAL. 

DISPLAY  OUTPUT  QUEUE  FOR  THIS  TERMINAL. 

DISPLAY  JOBS  IN  EXECUTION  FOR  THIS  TERMINAL. 

DISPLAY  CURRENT  STATUS  OF  OF  THIS  TERMINAL'S  I/O  DEVICES. 
DISPLAY  PUNCH  QUFUF  FOR  THIS  TERMINAL.  (JOBS  IN  THE  PUNCH 
QUEUE  MUST  BE  DIVEPTpO  TO  ANOTt-TR  TERMINAL  FOR  PUNCHING. 
SEE  below.) 
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HftNlPULATTNG  QUE UE-RES I OFNT  FILES 

IN  THE  FOLLOWING  GOMMflNDS,  JORNAMF  IS  THE  NAME  OF  THE  JOB/FILF 
AFFFCTFO.  it  may  of  the  7-CHARACTER  job  name  or  the  LAST  7 CHARACTERS 
OF  THF  NOS/BF  JOB  NAME. 

nivFPTt jonoAMF,rn,o 

transfer  files/jobs  TO  ANOTHER  LOCATION. 

JOBNAME  - NAME  OF  JOB  TO  BE  TRANSFERRED, 
in  - ID  OF  TERMINAL  TO  RECFIVE  DIVERTED  JOB.  IF 

OMITTED,  DIVERT  TO  CENTRAL  SITE. 

0 - DIVERT  JOBS  FROM  THIS  QUEUE  ONLY.  Q MAY  BE 

0 (PRINT),  P (PUNCH),  I (INPUT),  DR  OMITTED 
(ALL  OUEUES) . 

FXAMPLFSt  DIVERT, CXXX0R7, PA, 0 DIVERT  PRINT  FILE 

CXXX0R7  TO  TERMINAL  PA. 

DIVERT, P7,,P  DIVERT  PUNCHING  OF  JOB  R7 

TO  CENTRAL  SITE, 

D'^OF,  JORNAMr 

DROP  A JOB  WHILE  IT  IS  IN  EXECUTION.  ANY  OUTPUT  IS  PLACED 
INTO  THF  OUTPUT  QUEUE. 

EVICT, JOBNAME, Q 

ELIMINATE  JOB  FROM  SPECIFIED  QUEUE.  Q MAY  BE  I (INPUT), 

0 (PRINT),  P (PUNCH),  OR  OMITTED  (ALL  QUEUES). 

PRIOR, JOBNAME, P,Q 

CHANGE  PRIORITY  OE  A PRINT  OR  PUNCH  FILE.  P IS  A 1-4 
digit  POSITIVE  OCTAL  NUMBER  DEFINING  THE  NEW  PRIORITY. 

JOBS  WITH  PRIORITY  0000  HILL  REMAIN  IN  THE  QUEUE.  Q MAY 
BE  0 (PRINT),  P (PUNCH)  OR  OMITTED  (PRINT  AND  PUNCH). 
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SOME  ERROR  MESSAGES 


COMHANC  IGNORED 

COMMAND  CANNOT  BE  PROCESSED.  (E.G.,  OEF.LPl  CANNOT  BE 
EXECUTED  WHEN  THE  PRINTER  IS  ALREADY  OFF.) 

COMMAND  REJECT 

EITHER  GO  OR  ON  COMMAND  MUST  BE  ENTERED  BEFORE  OTHER 
COMMANDS  MAY  BE  PROCESSED. 

CRN, JJJJJJJ, INPUT  FILE  ERROR 

ERRORS  IN  CREATING  INPUT  FILE.  JOB  JJJJJJJ  IS  DROPPED 
FROM  THE  SYSTEM.  CHECK  CARDS  FOR  ERROGS.  END.CR  AND  TRY 
AGAIN. 

CRN, JJJJJJJ, SHIFTED  DATA, INPUT  FILE  ERROR 

A CARD  HAS  READ  INCORRECTLY.  TO  PROCEEDt  ENO,CRl? 

CHECK  FOR  A DAMAGED  CARD  IN  THE  LAST  GROUP  READ  AND  FIx; 
PUT  AN  EOF  CARD  (6/7/8/9)  IN  FRONT  OF  THE  JOB  CARD  <FOR 
SAFETY)  AND  GO,CRl  TO  READ  COMPLETE  DECK. 

CRN, JJJJJJJJJJ, JOB  CARO  ERROR 

JOB  CARO  IS  INCORRECT.  JJJJJJJJJJ  IS  THE  JOB  NAME  OR  THE 
FIRST  10  CHARACTERS  OF  THE  JOB  CARD.  RETURN  TO  USER  FOR 
CORRECTION. 

CRN, NOT  ready 

°LACE  MORE  CAROS  lOR  AN  ENO-OE-FILE  CARO)  IN  READER. 

PRESS  LOAD.  ENTER  GO, CRN. 

INPUT  SUSPENDED  BY  SYSTEM 

SYSTEM  INPUT  QUEUE  IS  OVERLOADED.  READING  RESUMES 
AUTOMATICALLY  WHEN  OVERLOAD  CONDITION  ENDS.  (PRINTER  MUST 
BE  LOG ICALLY  ON. ) 

LPN,NOT  READY 

CORRECT  CONDITION.  READY  PRINTER.  ENTER  G0,LPN. 
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***  STROMBEPG  nflTAGPAPHTX  SC40G0 

the  STROMBERG  PATAGRAPHIX  SC40G0  IS  A STORED  PROGRAM  RECORDING 
SYSTEM  WHICH  TRANSLATES  DIGITAL  DATA  INTO  ALPHANUMERIC  AND  GRAPHIC 
DATfl.  INPUT  IS  EPQM  7-TRACK  TAPE  WHICH  SHOULD  RE  556  BPI  DENSITY. 
OUTPUT  IS  35  MM  FILM  WHICH  MAY  OPTIONALLY  RE  PRINTED  ONTO  ROLL  PAPER  BY 
XEPCX  COPYELOM.  THE  DEFAULT  OUTPUT  IS  PAPER  CUT  INTO  SHEETS  AT  CUT 
MARKS  inserted  ON  THE  FILM  FROM  A FORM  SLIDE  AT  EACH  FRAME  ADVANCE. 

THE  QUALITY  AND  RESOLUTION  ARE  BETTER  THAN  SC4020.  PRINT  STYLE  IS 
DIFFERENT  SINCE  LETTERS  HAVE  SERIFS. 

SC4020  STRANGER  TAPES  WRITTEN  BY  SCORS  PACKAGE  ON  CDC  ARE 
PROCESSED  BY  PROGRAM  "4020“.  OUTPUT  IS  SIMILAR  TO  SC4020  EXCEPT  FOR 
SCALE  AND  PULL  DOWN  BETWEEN  FRAMES,  PLOTS  ARE  LARGER  AND  SPACE  BETWEEN 
FRAMES  IS  GREATER. 

SYSTEM  STANDARD  PRINT  TAPES  HAY  BE  PRINTED  ONTO  35  MM  FILM  USING 
SC40E0  PROCESS  PROGRAM  “PCOC“.  ARCHIVE  RECORDS  COULD  BE  PREPARED  ON 
ETi_w  POP  COMPACT  STORAGE.  PRINT  TAPES  FROM  SEVERAL  OTHER  COMPUTER 
SYSTEMS  MAY  BE  pROCESSFD  DIRECTLY  TO  FILM  USING  SUITABLE  PROCESSING 
PROGRAMS  SUCH  AS  "P70B"  FOP  IBM  7090  COMPATIBLE  PRINT  TAPES. 

A PACKAGE  OF  ROUTINES  WHICH  OUTPUT  “META"  CODE  EXCLUSIVELY  FOR 
SC40E0  IS  MORF  DIFFICULT  TO  LFAPN  THAN  SCORS  ROUTINES,  BUT  HAS  MANY 
ADDITIONAL  OPTIONS.  THE  RASTER  SIZE  OF  THE  SC4060  IS  3072  X 4096. 

THE  'OTSSPLA*  PACKAGE  HAS  'META*  OUTPUT  FOR  SC4060. 

THE  AOP  OFF-LI 
PROGRAM  TO  RE  USEDI 
4020  FOR 

PCDC 
META 

TO  GROER  FILM  ONLY 
THAT  IS  NOT  CUT  INT 


t 

i 


i 

! 

i 

I 


NE  REQUEST  MUST  INCLUDE  THE  NAME  OF  THE  PROCESS 


SC4020  STRANGER  TAPES  WRITTEN  BY  SCOPS  PACKAGE 

CDC  STANDARD  PRINT  TAPES 

SC4060  INTEGRATED  GRAPHICS  SOFTWARE 

without  cut  marks  BETWEEN  FRAMES  OR  ROLL  PAPER 

0 SHEETS,  PUT  "NO  CUT  MARKS"  ON  ADP  REQUEST. 
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♦**  COM  - OAT^GPAPHIX  4530  ••• 

COMPUTER  OUTPUT  MICROFICHE  (COM)  IS  PREPARED  ON  THE  STPOMBER& 
DATAGRAphIX  4530.  INPUT  IS  7-TRACK  TAPE  AT  «00  OR  556  BPI,  OR  9-TRACK 
TAPE  AT  AOO  BPI.  INPUT  TAPES  APE  PREPARED  FROM  FORMATTED  OUTPUT  OP 
REPORT  FILES  BY  THE  MPS  (MICROMATION  PRINTER  SYSTEM)  PACKAGE. 

OUTPUT  IS  105MM  FILM.  EACH  4 BY  6 INCH  (105MM  BY  148MM)  MICROFICHE 
MJY  CONTAIN  268  COMPLETE  PAGES  PLUS  EYE-READABLE  TITLE  AND  INDEX  AT 
STANCARD  NMA  48X  REDUCTION  RATIO.  PAGE  FORMATTING  ALLOWS  80,  132 
DP  144  CHARACTERS  PER  LINE  AND  UP  TO  80  LINES  PER  PAGE.  5 BY  6 INCH 
CUT  FILM  negatives  MAY  BE  CREATED  FOR  FORMS  OVERLAYS.  FICHE  FRAMES  ARE 
IN  COLUMNS  (WIDTH)  AND  ROWS  (LENGTH)  NUMBERED  FROM  AOl  TO  018  FOR  EASY 
REFERFNCF. 

SEVERAL  JOB  SET  UP  CAROS  ARE  AVAILABLE  ON  THE  4530.  PRINT  SPEED  IS 
APPROXIMATPL Y 14000  LINES  PER  MINUTE. 

THE  MPS  PACKAGE  IS  CAPABLE  OF  PRODUCING  FICHE  WITH  ALL  COC 
PRINTABLE  CHARACTERS  EXCEPT  THE  BACK  SLASH. 

A COM  TAPE  MAY  BE  PREPARED  AS  FOLLOWSt 
XXXX,CM55000,MT1. 

CHARGF.XXXX, JJJJJJJJJJ. 

ATTACH, TAPF03 (FILE  TO  BE  PUT  ONTO  MICROFICHE) 

L ABEL , TAPE0  4,L  = XXXXCOMOUT  ,0=HY ,F  = S,RING  ,H,VSN=CB9999. 
BEGIN,UTILITY,,MPSCM. 

' 7/8/9  FOR 

(MPS  DATA  CARDS) 

6/7/8/B  EOF 

PEEERFNCEt  "COMPUTER  OUTPUT  MICROFICHE  REFERENCE  MANUAL",  CMD-16-76, 
BARBARA  DAVIS 
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CALCOMP  MODEL  936 

THF  CMLO  CALCOMP  MODEL  936  DRUM  PLOTTER  IS  SOURCE  CODE  COMPATIBLE 
WITH  CALCOMP  736. 

THE  FOLLOWING  PLOTTING  PAPERS  AND  PENS  WILL  BE  AVAILABLE  TO  USERSl 


1 . 

36.7 

INCH 

PLAIN  PAPER 

#500 

7 . 

36.7 

INCH 

10  DIVISIONS 

PER 

INCH 

(BROWN 

GRID) 

#501 

3. 

15.4 

INCH 

PLAIN  PAPER 

#600 

4. 

15.4 

INCH 

10  DIVISIONS 

PER 

INCH 

(BROWN 

GRID) 

#601 

*5.  3 BALL  POINT  PENS 

A CALL  TO  SUBROUTINE  NEWPEN  (N»,  WHERE  N = 1,  ?,  OR  3 MILL 
ALLOW  USERS  TO  ALTERNATE  3 PENS  IN  ONE  JOB.  COLORS  GREEN, 
RED,  BLUE  AND  BLACK  ARE  AVAILABLE.  SEE  CALCOMP  BASIC 
MANUAL  FOR  DESCRIPTION  OF  NEWPEN. 

THE  BASIC  SET-UP  FOR  THE  CALCOMP  936  WILL  BE  AS  FOLLOWSl 

♦ 15.4  INCH  PAPER  <#600  OR  #601) 

* PEN  1 (BLACK) 

* PEN  7 (BLUE) 

• PEN  3 (RED) 

A CHANGE  TO  WIDE  PAPER  (36.7  INCH)  OR  A CHANGE  IN  PEN  ARRANGEMENT  WILL 
INCREASE  THE  BASIC  CHARGE  RATE. 


THE  ABILITY  TO  DISPLAY  AND  SEARCH  FOR  BLOCK  ADDRESS  IS  NOT  AVAILABLE 
ON  THE  CALCOMP  936.  USERS  WHO  NEED  TO  SELECT  BLOCKS  FROM  THEIR  CALCOMP 
TAPE  MUST  USE  A CDC  6000  PROGRAM. 
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*•*  CftLCOMP  MODEL  763  *** 

CflLCOMo  model  763  IS  A DRUM  TYPE  DIGITAL  ZIP  MODE  PLOTTER  WITH  A 
PLOTTING  AREA  OF  29.5  INCHES  BY  120  FEET,  A CHOICE  OF  THREE  STEP  SIZES, 
AND  AN  INCR'^MFnTAL  RATE  OF  350  OR  450  STEPS  PER  SECOND  DEPENDING  ON 
STEF  SIZE.  THE  MAGNITUDE  OF  THE  STEP  SIZE  IS  .01  OR  .005  INCH  WITH  A 
resulting  ABILITY  TO  PRODUCE  INCREMENTAL  VECTORS  IN  24  DIFFERENT 
COMPINATTCNS  OF  LENGTH. 

THE  PLOTTER  WHICH  IS  LOCATED  IN  BUILDING  13,  OPERATES  OFF-LINE 
FROM  HI  density  (556  BPI>  7-TPACK  TAPE.  THE  AERO  COMPUTER  CENTER  PHONE 
IS  (20?)  227-1423.  TAPES  MAY  BE  LEFT  AT  ADP  CONTROL  WITH  PROPER  FORMS 
AND  THF  PLOTS  SHOULD  BE  RETURNED  WITH  ONE  DAY  TURN  AROUND. 

SUBROUTINE  CALLS  ARE  USED  ON  CDC  6000  OR  OTHER  COMPUTER  SYSTEMS 
TO  GENERATE  THE  TAPE.  PAGE  10-18  COVERS  CDC  6000  REQUIREMENTS  AND 
••PROGRAMMING  CALCOMP  PEN  PLOTTERS^^  DESCRIBES  THE  SIX  BASIC  ROUTINES. 
SEVERAL  OTHER  PACKAGES  OF  CALCOMP  ROUTINES  HAVE  BEEN  PURCHASED. 

THE  FEATURES  OF  THE  SYSTEM  INCLUDE  ABILITY  TO  DISPLAY  AND  SEAPCH 
FOP  BLOCK  ADDRESS,  MAXIMUM  INCREMENTAL  SPEED  6.3  IN/SEC,  MAX  ZIP  MODE 
SPEFC  23.8  IN/SFC,  MAX  INCHES  OF  PLOT  PER  INCH  OF  INPUT  MAGNETIC  TAPE 
14,7,  interchange  OF  AXES  AND  PEN  CONTROL  BY  SWITCH,  NO  PARITY  CHECK 
SYSTEM,  fast  forward  AND  REWIND. 


CALCOMP  PLOT  REQUEST  *** 

PLOT  REQUEST  (FORM  10462/26)  MUST  BE  SUBMITTED  WITH  EACH  TAPE. 

USER  MUST  PROVIDE  PERTINENT  INFORMATION  FOR  THE  FIRST  TWO  SECTIONS  FROM 
LEFT  INCLUDING  JOB  ORDER  NUMBER,  ESTIMATED  PLOTTING  TIME  TO  AID  IN 
SCHECULING  of  work,  date,  block  numbers  of  REEL  IF  KNOWN  (USUALLY  0 
TO  9<:9),  REEL  NUMBER,  EXPECTED  NUMBER  OF  PLOTS,  PAPER  NUMBER  AND  GRID 
COLOR  FROM  NEXT  PAGE,  PEN  TYPE  (BALL  POINT  GIVES  BEST  RESULTS),  USER 
ORIGIN  IF  NONSTANDARD,  USER  NAME,  PHONE  NUMBER. 


L 


I 
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763  TALCOMP  PAPEP  AND  GRID  COLOP 


PAPER 

NUMOER 

description 

300 

PPOWN 

PLAIN  30  IN  WIDE  PAPEP 

301 

RLUE 

CONTINUOUS 

GRID  (10  PER  INCH) 

30 

INCH 

WIDE 

30? 

PLUE 

CONTINUOUS 

GRID  (20  PER  INCH) 

30 

INCH 

WIDE 

AOO 

PPOWN 

PLAIN  1?  INCH  WIDE  PAPER 

40  0- A 

PPOWN 

PAGE  SI7E 

(8.6  X 11)  PLAIN 

40  1 

PLUE 

CONTINUOUS 

GRID  (10  PER  INCH) 

12 

INCH 

WIDE 

40  1 

PPOWN 

continuous 

GRID  (10  PER  INCH) 

12 

INCH 

WIDE 

4 0 1-A 

PLUE 

PAGP  SIZE 

(7  X 10)  BLUE  GRID 

(TEAR  OFE)  10 

PER  INCH 

401-A 

PPOWN 

PAGE  SIZE 

(7  X 10)  BROWN  GRID 

(TEAR  OFE)  10 

PER  INCH 

40  1-P 

PLIJP 

double  page  size  (IS  y lo)  blue 

GRID 

401-R 

PPOWN 

DOUBLE  page  size  (15  x 10)  BROWN 

GRID 

40  ? 

PLUP 

CONTINUOUS 

GRID  (20  PER  INCH) 

12 

INCH 

WIDE 

406 

PPOWN 

CONTINUOUS 

GRID  CENTIHETER  (10  PEP  CM. 

) 25 

CM.  WIDE 

4 0 6-  A 

PPOWN 

PAGE  SIZE 

(IB  CM.  X 25  CM.)  CENTIMETER 

(TEAR  OFF) 

406-P 

PPOWN 

double  page  size  (38  CH.  X 26 

CM 

. ) IE AR  OFF 
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*»*  GSA-ATLANTft  TIHF  SHARING  SERVICE  ••• 


THE  GSA  TIME  SHARING  SYSTEM  IS  AN  ALTERNATIVE  SYSTEM  TO  INTERCOM 
WHICH  USES  A GE440  COMPUTER  WITH  64,000  <24-BIT,  3-CHARACTER)  WORDS  OF 
MEMCRY.  EACH  USER  HAS  AVAILABLE  16,000  WORDS  (WHICH  CAN  BE  INCREASED 
TO  18,500  BY  USING  THE  COMMAND  'RUNRIG*),  TERMINAL  ACCESS  IS  110  OR 
300  BAUD,  HALF  DUPLEX,  TTY  COMPATIBLE.  PROGRAMMING  LANGUAGES  ARE 
fortran  and  basic.  edit  and  SAM  ALLOW  FILE  MANIPULATION  SUCH  AS 
RFSFCUFNCE,  DELETE,  MERGE,  AND  REPLACE.  COC  6000  INTERCOM  SHOULD  BE 
USED  EXCEPT  WHEN  EXTENDED  BASIC  OR  SPECIAL  LIBRARY  ROUTINES  ARE 
RECUIRFD. 


operating  HOURS  ARE 


0800  - ?300 
1000  - 1700 


WEEKDAYS 

SATURDAYS 


FEDERAL  HOLIDAYS  EXCEPTED. 


ACCESS  TO  THF  SYSTEM  IS  OBTAINED  BY  FOLLOWING  THESE  STEPSI 


1.  REGISTER  CHARGEABLE  JOB 
BB7-1B10.  YOU  WILL  BE  ASSIGNED 

2.  DEPRESS  ORIG  BUTTON  AND 
CR  OTHER  110-BAUD  TERMINAL) 


TTY 

the 


COMPUTER  RESPONDS* 


ORDER  NUMBER  WITH  CODE  1891,  (202) 

A USER  ID  AND  PASSWORD. 

DIAL  9-755-2000  (FROM  MODEL  33  OR  35 
OR  9-755-2010  (FROM  JOD-BAUD  TERMINAL) 
440  TIME  SHARING 

TTY*  XX 


THE 


THE 


IN  USER  ID 
RESPONDS* 

IN  PASSWORD 
RESPONDS* 


GSA 

ON  AT  XX»XX  PN*XX 
USER  ID  — 

CARRIAGE  RETURN  (CR), 
PASSWORD 
(CR)  . 

TYPE  OLD  OR  NEW* 


AND 


3.  TYPE 
COMPUTER 

4.  TYPE 
COMPUTER 

5.  TO  ENTER  A NEW  PROGRAM  FROM  KEYBOARD  OR  PAPER  TAPE,  TYPE  'NEW' 

TO  CALL  UP  A PROGRAM  FROM  USER  PRIVATE  LIBRARY,  TYPE  'OLD*,  THEN  (CR). 
THE  COMPUTER  RESPONDS*  PROGRAM  NAME. 

6.  FOR  A NEW  PROGRAM  TYPE  IN  UP  TO  SIX  CHARACTER  NAME  (CR). 

FOR  AN  OLD  PROGRAM,  TYPE  THE  NAME  UNDER  WHICH  THE  PROGRAM  WAS  SAVED. 

IF  A LIBRARY  PROGRAM,  TYPE  THE  LIBRARY  NAME  FOLLOWED  BY  ♦♦♦  (CR). 

(F.G.  GAUSSl"** (CR) ) 


GSA  TIME  SHARE  MANUALS  INCLUDE*  A LIST  OF  LIBRARY  ROUTINES,  THE 

Terminal  users  guide,  and  pepepence  manuals  on  the  available  languages 

THEY  ARE  LOCATED  WITH  EACH  COORDINATOR  OR  THE  USER  SERVICES  BRANCH, 


(?0?) 

227-1907. 

A VOLUME  OF  LIBRARY  PROGRAM  LISTINGS 

IS  AVAIL 

FOP  INSPECTION  IN 

CODE 

1892. 

COORDINATORS 

ARE  LISTED 

BELOW* 

NAME 

BLDG 

ROOM 

EXT 

CODE 

G. 

MABRY 

3 

259 

71438 

19 

J • 

NI FMIEC 

3 

112B 

71636 

1945 

C. 

CH  AOnCCK 

1 3 

202A 

71670 

16 

R. 

SPNOFLBACH 

15 

100 

71379 

1936 

L. 

MUPLLER 

1 7 

too 

71907 

DTNSRDC  C 

O-ORDINA  T 

J • 

niSKIN 

16 

108 

71450 

15 

F. 

MS  yep 

19 

B204 

71751 

1 7 

C. 

.^ORMPO 

100 

2-J 

3343 

ANNAPOLIS 

1^7  7 
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*♦.  'UjTOMaxrp  npftFTiNf,  BKjn  goach  n data  rfpuction  station  *** 

ALTCK  AC-40  niGITT7TNG  SYSTFM  ♦»» 

THF  ALTFK  AC-40  OTGITIZINC  SYSTFM  IS  THt  FIRST  PART  OF  A FACILITY 
PFFFRRFC  TO  AS  AN  “AUTO^^A  TFH  OPAPTING  AND  GRAPHIC  DATA  RFDUCTION 
STATION".  ThF  CURRPNT  CONFIGURATION  INCLUDFS  A 42"  X 54“  3FNDIX 
OTGTTIZTNG  TAPLF  WITH  A FRFF-MOVTNG  CURSOR,  A 52-CHARACTER  KEYBOARD, 

A PAGNFTTC  TARF  DRIVE  (7-TRACK,  «00  DPI  - COMPATIBLE  WITH  COC  6000 
SERIFS  COMPUTPPS)  AND  IS  ALSO  INTpRFACED  TC  AN  026  KEYPUNCH. 

RFSCLUTION  IS  0.001"  WITH  AN  ACCURACY  OF  +0.005"  ACROSS  THF  BOARD. 

THE  FRTMARY  function  PF  THF  DIGITIZER  IS  TO  CONVERT  POSITIONAL 
GPAP  TC  INFORMATION  TO  A USARLF  FORM  IN  A COMPUTER  DATA  PROCESSING 
rOPMAT.  THE  DIGITIZER  MAY  RE  EQUATED  TO  A UNIQUE  ANALOG-TO-0 IG IT AL 
CONVERTER  WHEREIN  THE  ANALOG  DATA  IS  PRESENTED  IN  A GRAPHIC  FORM.  IN 
ADDITION  TO  OUTPUTTING  A SFCUFNTTAL  STREAM  OF  X,Y  CO-ORDINATES  OF 
POSITIONS  SELFCTRD  BY  MOVEMENT  OF  THF  CURSOR,  THE  DIGITIZER  IS  FITTED 
WITH  A PORTABLE  KEYBOARD  TO  PERMIT  INSERTION  OF  SPECIAL  CHARACTERS  OR 
ALPHANUMERICS  WITHIN  THF  STREAM.  THESE  CHARACTERS  WOULD  BF  PLACED  BY 
THF  OPERATOR  INTO  THE  STREAM  TO  COMMUNICATE  INSTRUCTIONS  TO  SOFTWARE 
WMFN  THE  DATA  IS  PRESFNTED  TO  THE  COMPUTER.  SOME  BASIC  SOFTWARE  WAS 
ACCUIRED  WITH  THE  DIGITIZER  RUT  ALL  SPECIAL  PURPOSE  PROGRAMMING  MUST  BE 
USER-DEVELOPED.  FOR  ADDITIONAL  INFORMATION,  SEE  CODE  1892. 


***  GRAPHICS  DATA  REDUCTION  AND  DESIGN  STATION 

A GENERAL  PURPOSE  GRAPHICS  DATA  REDUCTION  AND  DIGITIZING  STATION 
(GDRCS)  CONSISTING  de  A DIGITIZING  BOARD,  MINI-COMPUTER  AND  A CRT 
SCCPP  HAS  BEEN  INSTALLED  IN  BUILDING  192.  DIGITAL  DATA  DERIVED  FROM 
DRAWINGS  may  be  DISPLAYED  ON  THF  CRT  FOR  EDITING  AND  MAY  THEN  BE 
TRAFSMITTED  TO  THE  HOST  COMPUTER,  THE  CDC  6000t  FOR  FURTHER  PROCESSING. 

THF  GDPOS  MAY  BE  USED  EITHER  AS  A REMOTE  GRAPHICS  TERMINAL  OR  AS  A 
STAND  ALONE  GRAPHICS  DESIGN  STATION.  IT  CAN  BE  EFFECTIVELY  USED  IN  THE 
EOLLCWTNG  APPLICATION  APEASJ 

COMPUTER-AIDED  PIPING  DESIGN  AND  CONSTRUCTION 
SHIP  HULL-EORM  DESIGN 

PREPARATION  OF  INPUT  DATA  E OR  POTENTIAL  FLOW  COMPUTATIONS 
PPFPARATIOM  OF  INPUT  DATA  FOR  STRUCTURAL  ANALYSIS  COMPUTATION 

OFEFRFNCEt  "GRAPHICS  DATA  RFDUCTION  AND  DESIGN  STATION  USER'S  MANUAL", 
CMD-11-76 

ASFISTANQFt  PUFY  CHEN  (20?)  227-1683 
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GE 

12-15 

REMOTE  JOB  ENTRY  TO 

TI-ASC 

DTNSRDC  OPERATES 

a TEXAS  INSTRUMENTS 

(TI)  980 

REMOTE  BAT 

CH 

terminal 

TO  THE  TT  aOVANCED  SCIENTIFIC  COMPUTER  (ASC).  IT 

HAS  A CARD 

RE 

ADER, 

CARD  PUNCH,  LINE  PRINTER,  NINE-TRACK  TAPE 

DRIVE  , 

AND  AN  ll-I 

NCH 

CALCCMP  56S  DRUM  OLOTTFR. 

THF  Tl-ftSn  IS  a HIGH-SPEFO  SCIENTIFIC  COMPUTER  LOCATED  AT  THE  NAVAL 
RESEARCH  LABORATORY.  IT  IS  BATCH-ORIENTED  WITH  TELETYPE  ACCESS  THROUGH 
A ERCNT-FND  MINICOMPUTER.  THE  ASC  ARITHMETIC  UNIT  IS  A PIPELINE 
PROCESSOR  (?  PIPES»  WHICH  ALLOWS  IT  TO  PERFORM  VECTOR  ARITHMETIC  AT 
VERY  HIGH  SPEEDS.  APPROXIMATELY  700»000  32-BIT  WORDS  OF  CENTRAL  MEMORY 
AND  30  MILLION  WORDS  OF  SFCONDAPY  STORAGE  ARE  AVAILABLE  TO  USER 
PROGRAMS.  THESE  MAXIMUMS  ARE  EXPECTED  TO  INCREASE  IN  THE  NEAR  FUTURE. 

THF  JOB  SPECIFICATION  LANGUAGE  (JSL)  IS  SIMILAR  TO  IBM  JOB  CONTROL 
LANGUAGE  (JCL).  STANDARO  SOFTWARE  IS  SUPPLIED,  INCLUDING  AN  OPTIMIZING 
FORTRAN  COMPILER  WHICH  RECOGNIZES  MANY  LOOPS  WHICH  MAY  BE  EXECUTED  IN 
VECTOR  MODE.  ADDITIONALLY,  CERTAIN  SOFTWARE  TOOLS  HAVE  BEEN 
implemented  on  THE  ASC,  INCLUDING  RATFOR  (CCRM,  4-28)  AND  EDIT  (CCPM, 
8-4).  THE  TAPE-COPY  FACILITY  PERMITS  A USER  TO  USE  THE  ASC  AS  A 
“NUMBER  CRUNCHER**  AND  THEN  TRANSFER  DATA  TO  DRIVE  INTERACTIVE  GRAPHICS 
PROGRAMS  AVAILABLE  AT  DTNSRDC.  THIS  APPROACH  IS  ATTRACTIVE  TO  MANY 
USERS  AND  HAS  PROVEN  ESPECIALLY  EFFECTIVE  FOR  PERFORMING  INTRICATE 
FLUID  DYNAMICS  CALCULATIONS. 

potential  users  may  CONTACT! 

PAUL  MORAWSWI,  DTNSRDC  CODE  1843,  (202)  227-1D32 

BARBARA  BROOKS,  NRL,  (202)  767-3S42 
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» » « 


NAVY  LABORATORY  COMPUTER  NETWORK  (NALCON)  *** 


THE  NAVY  IS  CONDUCTING  A THREE  YEAR  EXPERIMENT  (FY76  THRU  FY78) 
TO  determine  the  effectiveness  of  COMPUTER  NETWORKING  IN  PROVIDING 
COMPUTING  SUPPORT  TO  THE  NAVY  LABORATORIES. 


IN  SUPPORT  OF  THESE  EXPERIMENTS,  THE  NAVY  LABORATORY  COMPUTER 
N»^7W0RK  (NALCON)  HILL  PROVIDE  A FULL  RANGE  OF  COMPUTING  SERVICES  TO 
ALL  THE  NAVY  LABORATORIES  AND,  EVENTUALLY,  TO  ALL  APPROPRIATE  NAVY 
ACTIVITIES  DESIRING  ACCESS  TO  THE  LABORATORY  COMPUTERS.  THE  INITIAL 
S»^RVICF  PROVIDED  HILL  BE  INTERACTIVE  PROCESSING.  REMOTE  JOB  ENTRY, 

AND  FILE  TRANSFER,  AS  WELL  AS  PROCFSS-TO-PROCESS  COMMUNICATION  WILL  BE 
ADCEO  IN  THE  FUTURE.  THE  IMPLEMENTATION  HILL  INSULATE  THE  MOST 
COMPUTERS  (UNIVAC  llOO'S,  CONTROL  DATA  CORPORATION  6000'S,  TEXAS 
TNSTRUMFNTS-ASC,  BURROUGHS  5500)  FROM  THE  NETWORK  ARCHITECTURE  BY  MEANS 
OF  A minicomputer-based  FRONT  END  SYSTEM.  THE  FRONT  END  WILL 
COMMUNICATE  WITH  THE  HOST  THROUGH  A GENERAL  HOST-FRONT  END  PROTOCOL  AND 
WITH  THE  ARPANET  THROUGH  THE  VERY  DISTANT  HOST  INTERFACE. 

ACCESS  TO  COMPUTING  RESOURCES  AT  THE  NAVY  LABORATORIES 
PARTICIPATING  IN  NALCON  AND  AT  OTHER  ARPANET  HOST  COMPUTERS  IS  NOW 
AVAILABLE  THROUGH  THE  NETWORK  ACCESS  MACHINE  OPERATED  BY  DTNSRDC. 
RESOURCES  THAT  MAY  BE  OF  INTEREST  INCLUDE! 

MACSYMA  A SYMBOLIC  MATHEMATICAL  LANGUAGE  AVAILABLE  AT  MIT. 

MAIL  ELECTRONIC  MAIL  SERVICE  IS  AVAILABLE  OVER  THE  ARPANET  ON  A 

LIMITED  BASIS. 

MLS  A SET  OF  COMPUTER-BASED  AIDS  FOR  PEOPLE  WHO  WORK  WITH 

INFORMATION.  SERVICES  AVAILABLE  INCLUDE  TEXT  PROCESSING, 
MESSAGE  HANDLING,  DOCUMENT  PRODUCTION,  PHOTOCOMPOSITION, 
AND  INFORMATION  STORAGE,  MANAGEMENT  AND  RETRIEVAL. 


ANYONE  NOW  ACCESSING  THE  ARPANET  THROUGH  A REMOTE  TIP  CAN  GET 
SERVICE  THROUGH  THE  LOCAL  NETWORK  ACCESS  MACHINE.  IT  HILL  BE  AVAILABLE 
SEVFN  DAYS  A WEEK,  18  HOURS  A DAY. 


CON 


FOP  FURTHER  INFORMATION 
TACT! 

FRANK  BPTGNOLI,  DTNSRDC 


ABOUT  NETWORK  RESOURCES  AND 
COOF  1826,  (202)  227-1683 


SERVICES, 
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**•  FARRINGTON  OCR  *** 

OPTICAL  CHARACTFR  PFADING  OF  SPECIAL  DOCUMENT  FORMS 
ON  THE  FARRINGTON  PAGE  READER,  MOOFL  3030.  THE  OCR  HAS 

620/1  computer;  output  is  on  magnetic  tape,  a teletype 

PRINTER  ARE  PART  OF  THE  SYSTEM. 


IS  PERFORMED 
A VARIAN  DATA 
AND  LINE 


jUNr  1077 
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U^FP  INTFPFACE 


GENFPAL  INFORMATION 


consultation  is  avail 

ABLE  FROM 

THE 

USER 

SERVICES  GROUP! 

CAPDEROCKt  bldg 

17, 

POOM 

100, 

(202)  227-1907 

ANNAPOLISt  bldg  1 

00, 

ROOM 

?J, 

(301)  267-3343 

FOR 

INFORMATION  ABOUT 

t 

SERVICES  AVAILABL 

E - 

CODE 

1892. 

1 

(202)  227-1907 

ACCOUNTING 

- 

CODE 

1891 

(202)  227-1361 

HARDWARE 

— 

CODE 

1 894 

(202)  227-1400 

THE 

ADP  CONTROL  CFNTE 

RS 

ARE  LOCATED 

AT 

THE  CENTRAL  SITE 

cnr  6000.  users  may  surmit  decks  and  pick  up  output  as  well  as  obtain 

INFCRMATION  ON  THE  PROGRESS  OF  THEIR  JOBS  FROM  THE  ADP  CONTROL  CENTER. 


THE  COMPUTER  USERS  FORUM  IS  A GROUP  OF  REPRESENTATIVE  USERS  OF  THE 
OTNSRDC  COMPUTFR  FACILITIES.  THE  FORUM  MEETS  QUARTERLY  TO  EXCHANGE 
INFCRMATION  BETWEEN  THE  USERS  AND  THE  COMPUTER  CENTER  MANAGEMENT. 

EACH  DTNSPOC  DEPARTMENT  AND  MAJOR  OUTSIDE  USER  HAS  REPRESENTATIVES 
ON  THE  FORUM.  FOR  MOPE  INFOPMATIONt  CONTACT  THE  CHAIRMAN  (USER 
SERVICES  GROUP). 

COMPUTER  CENTER  NOTES  IS  A PUBLICATION  SENT  TO  ALL  REGISTERED 
USERS.  IT  IS  sent  whenever  THERE  IS  INFORMATION  TO  BE  DISSEMINATED. 
THE  SYSTEM  BULLETIN  PROVIDES  CURRENT  NEWS  AND  IS  PRINTED  AT  THE 
beginning  of  each  job  and  each  intercom  LOGIN  (EXCEPT  SUP). 


OUTSIDE  COMPUTER  USERS  WORK  AREA  IS 
17).  PHONE  2d''-13fl2. 


IN  trailer  T-7 


(EAST  OF  BLOG. 


***  USER  TROUBLE  FORM  *** 

A USER  TROUBLE  FORM  (UTF)  IS  USED) 

1)  FOR  REFUND  REQUESTS  (SEE  CCRM,  2-1?  POLICY,  13) 

2)  WHEN  PROBLEMS  ARE  ENCOUNTERED: 

3)  FOR  SUGGESTIONS,  GRIPES  AND  COMPLAINTS. 

THE  UTF  SHOULD  INCLUDE  A SUCCINCT  DESCRIPTION  OF  THE  PROBLEM  AND 
INCLUDE  AS  MUCH  DOCUMENTATION  (DAYFILE,  LISTINGS,  DUMPS)  AS  POSSIBLE. 
IT  SHOULD  BE  SUBMITTED  TO  CODE  1B92  FOR  PROCESSING. 

TRCUBLF  EODMS  WHICH  DO  NOT  REQUIRE  DOCUMENTATION  MAY  BE  ENTERED 
DTPE^'TLY  into  the  computer  from  either  batch  or  INTERCOM.  THE 
OPCCEDURE  'GRTPE*  (CCRM,  7-221  CCLIB/P)  IS  USED  FOR  THIS. 


GRIPES 

GRIPES  AND  comments  MAY  BE  SENT  TO  USER  SERVICES  VIA  INTERCOM. 

USF  •BFGTN,SEN0,,SFN0,U*  (SEE  CCRM,  B-12:  CCLIB/PI  SEND).  THE  'GRIPE* 
PROCEDURE  (CCRM,  7-22)  MAY  ALSO  BE  USED  (BATCH  OR  INTERCOM).  ALL 
MESSAGES  AND  GpTPES  WILL  BE  READ  AND  TROUBLE  FORMS  PREPARED,  IF 
apppCPPIA  TE. 
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*•*  COMPUTER  REFERENCE  CENTERS 

A complete  LTRPARY  OE  all  CPC  fiOOO  ANO  MANY  OTHER  COMPUTER  PRODUCT 
DOCUMENTS  ISEE  CCRM,  13-1)  MAY  RE  CONSULTED  IN  CODE  1A92.1  (BLOG.  17, 
»OCM  100).  SUBSETS  OE  FREQUENTLY  USED  MANUALS  ARE  AVAILABLE  FOR 
REFERENCE  AT  A NUMBER  OE  OTHER  SITES.  THESE  COMPUTER  REFERENCE  CENTERS 
ARE  LISTED  BELCWI 


COPE 

NAME 

152 

R.  WEPMTER 

15A4 

E.  CASTER 

1575 

H.  MEYER 

15P1 

E.  ROGERS 

1725 

P.  ROTH 

1 52« 

A.  CAMARA 

lfl43 

R.  VAN  ESELTINE 

1544 

M.  GOLDEN 

1555 

D.  BENIGNI 

1553 

M.  LAMATPICE 

1554 

N.  EICKEN 

15P 

G . GRAY 

150?. ^ 

J.  STRICKLAND 

150?.  ? 

D.  SOMMER 

150?. ^ 

L.  MI  MOP 

lo?5 

0.  VENOITIS 

5541 

OTNSROC  LIBRARY 

5 34 

P.  PIERCE 

IPPP 

V.  POYNFR 

5045E 

J. 

GI  VPN 

50  3 3 

R. 

SATnGER 

40  13 

S. 

BERNSTEIN 

570  7 

H. 

PRY  ANT 

G. 

VEGA 

R. 

SCHMIDT 

S. 

STFE  cncik 

LOCATION 

BLDG 

2, 

RM 

201 

BLDG 

16, 

RM 

105 

BLOG 

15, 

RM 

101 

BLOG 

7, 

RM 

115 

BLDG 

19, 

RM 

A248 

BLGO 

191, 

RM 

121 

BLOG 

192, 

RM 

125 

BLOG 

192, 

RM 

121 

BLOG 

17, 

RM 

230 

BLDG 

17, 

RM 

215 

T-25 

bldg 

1 7 

BLOG 

17, 

RM 

100 

BLDG 

100, 

RM 

1-E,  ANNAPOLIS 

BLDG 

17, 

RM 

105B 

BLDG 

15, 

RM 

112 

BLDG 

1, 

RM 

211 

BLDG 

121, 

RM 

132 

PORTSMOUTH,  VA. 


NAVSEC  - RLDG  NC2 
NAVAIR  - BLDG  JP2 
NAVAIR  - BLDG  JP2 
NRL,  BLOG  35 
BAY  ST.  LOUIS,  MISS. 
CERL,  champaign,  ILL. 
NWSC,  CRANE,  IND. 


JUKT  1977 


PAGE  13-3 


*»•  computep  pefepence  manuals 


N AMP 


PUBLICATION  NUMBER 


COMPUTER 

COMPUTPO 

COMPUTER 

computer 

COMPUTER 

COMPUTER 

COMPUTER 

COMPUTER 

ADP  CLOSS 

COMPUTER 


CENTER  pOLTCY 

CENTER  INTPOnuCTORY  REEEPFNCF  MANUAL 
CENTER  reference  MANUAL 

center  libraries 

center  LIBPARIES/NCRDC  (SUBPROGRAMS) 
CENTER  LIBPAPIES/PROEIL  (PROCEDURES) 
CENTER  LIPRARIES/UTTLITY  (PROGRAMS) 
OUTPUT  MICROFICHE  (COM)  REFERENCE  MANUAL 
ARY 

PROGRAM  documentation  STANDARDS 


JULY  1975 

CMLD-77-10 

CMLO-77-11 

CMLD-77-12 

CMLD-77-15 

CMLD-77-16 

CMLD-77-17 

CMO-lG-76 

NAVSO  P-3097 

SECNAV  INST  5233.1 


EISPACK 

international  mathematical  and  statistical  LIBRARIES 
APSTRACTS  (IMSL) 

MATH  SCIENCE  LIBRARY  ABSTRACTS  (MSL) 

SCAOPO  programmers  REFERENCE  MANUAL 
VIM  (SUPPLEMENT)  (ON  MICROFICHE) 


PROGRAM 

MING  CALCOMP 

PEN  PLO 

TTFPS 

1006A 

lOM 

1170 

CALCCMP 

FUNCTIONAL 

PACKAGE 

BUSINESS 

lOllA 

&C 

10G9 

CALCCMP 

FUNCTIONAL 

package 

CRVT 

1014 

6C 

0 769 

CALCCMP 

FUNCTIONAL 

PACKAGE 

DRAFTING 

1012A 

3C 

0670 

CALCCMP 

FUNCTIONAL 

PACKAGE 

GENERAL 

1013A 

3C 

0670 

CALCCMP 

FUNCTIONAL 

PACKAGE 

SCIENTIFIC 

1015B 

6C 

170 

CALCCMP 

THREE-O  manual 

1002B 

5M 

769 

OISPPLA 
DISSPL A 
DISSPL A 
DISSPOP 


POCKET  MANUAL 

BEGINNER/INTERMEOI ATE  MANUAL  VOLUME 
ADVANCED  MANUAL  VOLUME  II 
(DISSPLA  POST-PROCESSOR  OPTION) 


I 


L 
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rnr  manuals 


PUBLICATION  NUMBER 


AUTCHATIC  PPOGPAMMEn  TOOLING  SYSTEM  (APT  IV) 
VPPSICN  ? RPFERPNCE  MANUAL 

BA«-ir  VFPSTON  7 pfffpfngf  manual 

COPCL  VFPSTON  4 RFFPRFNCE  MANUAL 

COMPASS  VFPSION  3 RFFFRFNcf  MANUAL 
CYPFP  rO><‘^ON  UTILITIES  PEFEPFNCF  MANUAL 

rppH  pfffrfnCF  manual 

FOPTPAN  FXTENnFD  VFPSION  4 PEFEPFNCF  MANUAL 

FTN  FXTFNnFD  OFBUG  USER'S  GUIOE 
INTERACTIVE  GRAPHICS  SYSTEM 
INTFRCCM  VERSION  4 pEFEPENCE  MANUAL 

TNTFPCOM  INTERACTTVF  GUIDE/COPOL  USERS 

intercom  intfoacttve  guide/etn  users 
LOAPFR  VFPSION  1 PEFFPFNCE  MANUAL 

MARS  VT  VER.  ?.l  (FULL  INVERSION) 

MAPS  VT  VER.  7.1  (PARTIAL  INVERSION) 

MIMIC  SIMULATION  language 
NOS/RE  1 REFERENCE  MANUAL 
RERT/COST  pfeEPENCE 
PERT/TTMF  REFFpc^nE 

PECORn  manAGFp  version  1 RFFERFNCE  (COMPASS) 
PEECPO  VANAGER  GUTOE/COROL  USERS 
RFCOPO  manager  version  1 GUIDF/ETN  USERS 
RECCPO  manager  USER'S  GUIOE 

peffpencr  manual 

scope  version  3. 3/3.4  CONVEPSION  AIDS 
SCOPE  3.4  peffREmcf  MANUAL 
SCOPE  3.4  USER'S  GUIDE 
STMSCPTPT  prEFPFMCE  MANUAL 

SORT/MfPsr  VERSIONS  4 (AND  1)  RFEEPENCE  MANUAL 

UPPATF  PFEFP^^>CF  manual 


17326900 
19983900  C 
60384100  F 
OP  60496800  B 
60360900  F 
60493300  8 
OR  60495600  D 
60307000  E 
60305600  K 
OR  60497800  B 
60329400  B 
17  30  360  0 E 
60307100  E 
OR  60494600  C 
60385700  B 
60359700  B 
60344200  G 
OP  60429800  C 
17313000  A 
17313100  A 
44610400  D 
60493800  C 
17309200 
60133600  B 
60307300  J 
60385300  A 
60385200  B 
60359600  C 
60100000  AH 
60358200  C 
60307200  L 
60358700  A 
60178300  C 
60343900  J 
OR  60497500  B 
60342500  G 
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•*»  CONTROL  SITF  FAM  PROCFSSING  *•* 

AT  THF  CFNTRAL  SITF,  CARD  LISTING  AND  RFPRODUCTIDN  A»F  PFRFORMFD 
WITHPUT  ADOITTONAL  CHARGF  FXCFPT  A',  INDICATFD  DFLOW. 

1)  EAM  JDPS  DF  LESS  THAN  ?000  CAROS  MAY  BE  PROCESSED  DURING  THF 
PRIMP  PHTFT. 

2)  PAM  JOBS  OF  GREATER  THAN  1009  CAROS  WILL  BE  PROCESSED  OVERNIGHT. 

JORS  OF  THIS  SIZE  WHICH  MUST  BE  PPOCESSEO  DUPING  THE  PRIME  SHIFT 

WILL  BE  DONE  WITH  THE  USER'S  JOB  ORDER  NUMBER. 

3)  THE  COMPUTER  CENTER  RESERVES  THE  RIGHT  TO  CHARGE  AT  THE 

ESTABLISHED  RATE  JOBS  PROCESSING  MOPP  THAN  4000  CARDS  (LISTED 
OP  REPRODUCED) . 

4)  SYSTPMS  utilities  WHICH  SERVICE  FAM  FUNCTIONS  MAY,  OF  COURSE, 

RP  UTILI7F0  BY  USERS.  SEE  USER  SERVICPS  GROUP. 


AOP  CONTROL  CENTER 

THF  ADP  CONTROL  CENTER  HAS  THE  FOLLOWING  CAPABILITIES: 

1)  REPRODUCE  BINARY,  BCD  (026)  OR  EBCDIC  (020)  DECKS.  THF  DECKS 
CANNOT  CONTAIN  EMRPDOED  ENO-OE-FILE  (6/7/070)  I'.AROS. 

2)  LIST  DECKS.  THE  DECKS  CANNOT  CONTAIN  EMBFOOFD  END-OP-FILF  CARDS 

3)  CONVERT  070  DECKS  TO  026.  THE  CONTROL  CENTER  MUST  BE  INFORMED 
IF  THE  IN°UT  IS  EBCDIC.  THF  DECKS  CANNOT  CONTAIN  fmBEQDEO 
ENO-OE-EILF  CAROS. 

TO  CONVPPT  026  DECKS  TO  020  DECKS,  A SPPCIAL  PPOCFDUPP,  CV20  (SEE 
CCLIP/R),  IS  AVAILABLP.  THE  DECKS  TO  BE  CONVERTED  CANNOT  CONTAIN 
EMPECOFD  ENO-OE-PPCORD  OR  ENO-OF-FILF  CARDS. 

TO  REPRODUCE  A DECK  WITH  SEQUENCING,  GANGRUNCHING  OR  ALTERATION  OF 
FIELDS.  (SEE  CCLIP/Ut  CARDS/CAPOS?) 

THF  FOLLOWING  FAM  FACILITIES  ARE  AVAILABLE  OFF-LINE: 

1)  CARO  INTERPRETER 

2)  DECOLLATOR  (AVAILABLE  FOR  USE  BY  INDIVIDUALS) 

3)  SHRFODPP  (AVAILABLE  FOR  USE  BY  INOIVIOUALS) 

4)  CARD  SORTER  (AVAILABLE  IN  ANNAPOLIS) 


PUNCHED  CARDS  FROM  CENTRAL  SITE  *** 

ALL  END-OE-RFCORD  AND  END-OE-FILF  CARDS  PUNCHED  SHOULD  HAVE  BEEN 
marked  by  ADP  CONTROL  WITH  A RED  MARKER  ON  THE  END.  IN  ADDITION,  ANY 
CAPO  WHICH  TRIGGERFD  A COMPARE  ERROR  WILL  RE  HARKED.  THE  USER  SHD'Jl.L’ 
PULL  OUT  any  REO  MARKEO  OEFECTIVE  CARDS,  SINCE  THF  CARD  WAS  REPUNCHED 
CORRECTLY  BY  THF  SYSTEM  IMMPOIATFLY  FOLLOWING  THE  BAO  ONE. 
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*****  USER  HELPS 


♦**  JOB  RERUN 


IE  MACHINE  EA 
MAKES  RERUN  OE  A 
INITIATE  RERUN, 

ANY  JOB  WHICH 
RENAMED  A EILE  MA 
OEADSTART  MIGHT  C 
WHENEVER  POSS 
IE  IT  IS  DESIRED 
MANIPULATED  TAPES 
CONTENTS,  A SMALL 
ACCOMPLISHED  BY  • 


ILURE,  END  OE  SHIET,  OR  NEED  FOR  UNAVAILABLE  RESOURCES 
JOB  NECESSARY,  THE  OPERATOR  OR  SYSTEM  OEADSTART  MAY 

HAS  PROPERLY  CATALOGED,  PURGED,  EXTENDED,  OR 

Y not  be  rerun  by  operator  type-in,  but  a system 

AUSE  ANY  JOB  TO  BE  RERUN. 

IBLE  JOBS  SHOULD  BE  SET  UP  SO  THEY  MAY  BE  RERUN. 

TO  INHIBIT  THE  POSSIBILITY  OE  RERUN  WHICH  MAY  HAVE 
TO  SOME  POSITION  WHERE  A RERUN  MIGHT  DESTROY  THE 
FILE  CAN  BE  CATALOGED  AND  THEN  PURGED.  THIS  CAN  BE 
BEGIN, norerun, », 


ABORT  PROCESSING 


CP  TIME  LIMIT 


WHEN  A JOB  ABORTS  ON  “CP  TIME  LIMIT”,  FIVE  CP  SECONDS  ARE  ALLOCATED 
FOR  “EXIT"  PROCESSING.  THIS  ALLOWS  TIME  TO  CATALOG  FILES,  UNLOAD,  ETC. 
ONLY  ONE  SUCH  TIME  EXTENSION  IS  ALLOWED. 


TIME  LIMIT 


WHEN  A 
FOR  “EXIT' 
USER. 


JOB  ABORTS  ON 
PROCESSING. 


“TO  TIME  LIMIT”,  100  10  SECONDS  ARE  ALLOCATED 
NO  10  LIMIT  IS  ENFORCED  UNLESS  SPECIFIED  BY 


MASS  STORAGE  LIMIT 

WHEN  A JOB  ABORTS  ON  “MASS  STORAGE  LIMIT  EXCEEDED”,  ENOUGH  MASS 
STORAGE  IS  AVAILABLE  FOR  TAKING  A DMP,  AND  ADDITIONALLY  UP  TO  200  PPUS 
ARE  available  FOR  EXIT  PROCESSING. 


MESSAGE  LIMIT  EXCEEDED 


THE  OAYFILE  CAN  HAVE  A MAXIMUM  OE  1000  MESSAGES,  AFTER  WHICH  THE 
JOB  ABORTS. 


REPRIEVE 

WHFN  REPRIEVE  IS  USFD  WITHIN  A JOB  TO  CONTROL  ABORT  CONDITIONS, 
THE  MAXIMUM  ADDITIONAL  ALLOCATION  IS  B CP  SECONDS,  100  10  SECONDS, 
AND  200  PRUS  mass  STORAGE.  ONLY  ONE  SUCH  REPRIEVE  IS  ALLOWED. 
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CONVERSION  AIDS 


non-stanoaro  fortran  usage 

THE  ANSI  flag  OF  THE  FTN  COMPILER  ON  THE  COC  6000  WILL  INDICATF 
NON-STANOARO  FORTRAN  USAGE.  USE  F T N,  EL= A,  . . . . 


CONVERT  DOUBLE  PRECISION  TO  SINGLE  PRECISION 

CVT360  IS  A SNOBOL  PROGRAM  TO  CONVERT  DOUBLE  PRECISION  S/360  FORTRAN 
PROGRAMS  TO  SINGLE  PRECISION  CDC  FORTRAN.  SEE  CCRM,  10-30. 

EBCDIC  TO  BCD 

PUT  »29»  INTO  COLUMNS  79-80  OF  THE  END-OF-RECORD  (7/8/9)  CARD 
PRECEDING  THE  DECK.  THEN  USE  COPYCF, INPUT, PUNCH. 


BCD  TO  EBCDIC 

CV29  IS  A PROCEDURE  TO  CONVERT  FROM  BCD  TO  EBCDIC.  SEE  CCLIB/P. 

COBOL  4 TO  COBOL  5 

SEE  CCRM,  5-16,  FOP  A DISCUSSION  OF  THE  COBOL  4 TO  COBOL  5 LANGUAGE 
CONVERSION  SYSTEM  (LCS) . 


SEE  CONV  MANUAL  FOR  ADDITIONAL  AIDS. 
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COMHUNICATIONS  HITH  OPERATOR  *** 


-PH-  CARRIAGE  CONTROL  DISPOSITION  AT  REMOTE  SITES  ••• 

-PM-  IN  COLUMNS  1 AND  2 OF  AN  OUTPUT  PRINT  LINE  HILL  STOP  THE  LINE 
PRINTER  AND  DISPLAY  A MESSAGE  AT  THE  OPERATOR'S  CONSOLE  OF  200UT 
TERMINALS  (OR  THE  CENTRAL  SITEJ  OR  THE  TELETYPE  AT  A 1700.  THE  MESSAGE 
(COLUMNS  3-32  OF  THE  PM  PRINT  LINEI  SHOULD  INFORM  THE  OPERATOR  WHICH 
PRIM  FORMS  ARE  TO  BE  MOUNTED  OR  CARRIAGE  CONTROL  TAPE  IS  REQUIRED 
BEFORE  THE  OPERATOR  RESTARTS  THE  PRINTER  FROM  HIS  CONSOLE.  (SEE  CCRM» 
2-9  FOR  TYPES  OF  SPECIAL  FORMS. 1 SPECIAL  FORMS  USAGE  AT  CENTRAL  SITE 
SHOULD  ALWAYS  BE  BY  ROUTE  OR  DISPOSE  CARD  (SEE  CCRM,  2-10,  2-8). 

REMOTE  SITE  SPECIAL  FORMS  MAY  BE  ACCOMPLISHED  IN  ONE  OF  TWO  WAYS* 

1.  PY  CONTROL  CARD  (SEE  NOTE  BELOW) I 


C0*»YCR  (INPUT, OUTPUT) 

• • • 

(EXECUTE  PROGRAM  WHICH  CREATES  THE  SPECIAL  FORM  OUTPUT) 

• • • 

EXIT,U. 

COPYCR (INPUT, OUTPUT) 

» 7/8/9  EOR 

PM  MOUNT  SPECIAL  FORMS  TYPE 

' 7/8/9  EOR 

• • • 

(RECORDS  AS  NEEDED  FOR  INTERMEDIATE  STEPS) 

• • • 

' 7/8/9  EOR 

PM  REMOUNT  STANDARD  FORMS 
••  e/7/8/9  EOF 


?.  WITHIN  PROGRAM  EXECUTION  (SEE  NOTE  BELOW)  I 

FORTRAN  EXAMPLE 


• • • 

PRINT  10 

10  FORMAT  ("PM  MOUNT  SPECIAL  FORMS  TYPE") 


NOTEt  IT  IS  THE  USER'S  RESPONSIBILITY  TO  ENSURE  THAT  THE  STANDARD  FORMS 
OP  CARpTAGE  control  tapes  are  restored  to  the  printer  AT  THE  END  OF  THE 
JOP. 
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• »*  <;PFCIAL  carriage  CONTROL 

ViH'^N  THF  FOLLOWING  CHARACTEPC  ARE  UCEO  FOR  CARRIAGE  CONTROL 
(CCLUM^  1)  ON  CENTRAL  SITE  OR  1700  PRINTERS,  NO  PRINTING  TAKES  PLACE. 
THF  FFHAINO'^R  OF  THF  LINE  IS  IGNORED. 

character  action 

0 CLFAR  AUTO  PAGE  EJECT  (DEFAULT) 

R SELECT  AUTO  PAGE  EJECT  (SPACE  OVER  PAPER  FOLD) 

S SET  6 LINES  PER  VERTICAL  INCH  (DEFAULT) 

T SET  0 LINES  PER  VERTICAL  INCH. 

SEP  rCRH,  14-T  FOR  PH  AND  CCRM,  4-«,  5-S  FOR  SPECIAL  SPACING. 


***  OAYFILE  HPSSAGE  DISPLAY 


TO  DISPLAY  A MESSAGE  AT  A CONTROL  POINT  AND  IN  THE  OAYFILEl 


COBOL 

- DISPLAY 

FTN 

- CALL  REMARK  OR 

CALL  OISPLA 

CONTROL 

CAOn 

- COMMENT. 

THESE  messages 

WILL 

NOT  FLASH  OR  WAIT 

FOR  OPERATOR  ACTION. 

RESERVED  WORDS 

FILES  WHIOH  have  special  DISPOSITIONS  AT  END-OF-JOB  MAY  NOT  BE 
USED  AS  FILE  NAMES  ON  DEVICE  SETS  OR  AS  OVERLAY  FILE  NAMES. 

FILE  NAME  MAY  ONLY  BE  USED  AS 


INPUT 

OUTPUT 

PUNCH 

PUNCHB 

P»(0C 

FILMPL 

FILMPR 

PLOT 

PT  APE 


JOB  STREAM  OR  TTY  INPUT 

JOB  STREAM  OR  TTY  OUTPUT 

BCD  PUNCH  FILE 

BINARY  PUNCH  FILE 

SPECIAL  BINARY  PUNCH  FILE 

SC40?0  SCORS  PLOT  FILE 

SC40B0  META  PLOT  FILE 

1700  REMOTE  CALCOMP  PLOT  FILE 

ASCII  PAPER  TA^E  OUTPUT  FROM  APT 


interactive  intercom 
OBJECT  files  since  THESE 


WILL  NOT  ALLOW  MOST  SINGLE  LETTER  NAMES  FOR 
APE  ABBREVIATED  INTERCOM  COMMANDS. 


INTERCOM  USERS  SHOULD  AVOID  ANY  LOCAL  FILES  OF  THE  SAME  NAME  AS 
TNTERCCM  COMMANDS,  SINCE  MANY  OF  THESE  HAVE  A PRESET  FIELD  LENGTH 
WHICH  COULD  CAUSE  A BINARY  PROGRAM  NOT  TO  LOAD. 
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INDEX 


I 


♦ » * » » 


NOTE 


NOS/BE  SYSTEM  CONTROL  CAROS  ARE  FLAGGED  WITH 
UPDATE  DIRECTIVES  BEGIN  WITH  ♦. 


A 

PAGE 

ABBREVIATION 

I 

abnormal  ENDING 

?-F 

ABORT 

‘♦-1  , 

4-«  , 

ABSOLUTE  file 

5-1 

ABSOLUTE  MODULE 

4-25 

ABSOLUTE  OVERLAY 

7-15 

ACCESS  LEVEL 

7-10 

ACCOUNT  (AC) 

3-4  , 

3-6 

ACCOUNTING 

2-4 

ADD,  EDITLIB 

7-10 

♦APDEILE 

7-3 

ADP  CONTROL  CENTER 

13-1  , 

13-5 

ADVANCED  SCIENTIFIC  COMPUTER 

12-15 

ADVANCTNGt  COBOL 

5-5 

AEROSPACE  RESEARCH  LABORATORIES 

(ARU  10-3 

AETSKC 

5-2 

AEXEC 

«-2 

ALGOL 

11-1 

algorithm 

11-1 

alphameric 

3-6 

ALTEK  AC-90  DIGITIZING  SYSTEM 

12-14 

ALTER 

3-4  , 

3-5 

ANALOG 

11-12, 

12-1  4 

ANALYSIS  OF  VARIANCE 

10-22, 

or 

t 

ANALYSTS,  STRUCTURAL 

11-11 

ANSI 

4-1  , 

4-6  , 

ANSI  COBOL 

5-1 

ANSI,  FORTRAN 

14-2 

ART3,  APIA 

11-2 

ARGONNE 

10-3  , 

10-22 

arguments 

4-5 

ARLNALG 

10-3 

ARRANFT 

12-16 

ARRAYS 

4-7 

ARRIPA 

10-22 

ASC 

12-15 

ASCII  terminals 

1-1 

ASCII  FI-character  set 

1-7 

ASCTIF 

1-7  , 

5-5 

ASSEMBLER 

11-6 

1 


j 
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PA&e  IS-? 


ft  (CONT) 

PAGE 

TNTPPCOM 

9-4 

ATTflCH 

10-?4 

••ft  T T ACH 

3-S  , 

3-11 

AUPI  T 

7-?l 

••altit 

3-4  , 

3-12 

AUPIT 

7-?? 

AUTC,  tty 

9-S 

AUTCFOTT 

8-4 

AUTCPATfO  nPAFTlMG 

1?-14 

AUTTVATir  PUPGF 

3-3 

AUTCPftTTCALLY  PpOGPAMMFn  TOOLS  (APT) 

11-? 

AX 

10-7 

R 

PAGE 

PACXSPAOF 

6-3 

backup 

9-9 

RAMDIT 

11-11 

RA  NNFP 

?-S 

"RA'^TC 

9-6  , 

10-23 
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